Guru do Excel e Power BI

Olá
Tem um código, abaixo, que sera utilizada em diversas plans. Ressalto que estas planilhas são identicas, porém o código especifica "planila1" e assim por diante... e dessa forma tenho que multiplicar o mesmo código. Como reformular esse parâmetro para que possa utilizar o mesmo código em em diversas planilhas? Evitando assim as várias cópias do mesmo código para atederem as diversas plans?
Espero ter feito entender...
Grato,
Marcelo Adriano

IMAGEM 1

IMAGEM 2

Parte do código:
Option Private Module

Option Explicit

Sub CélulasParaMatriz_PrimeiroBimestre()
Dim w As Worksheet, t As Long, i As Long
On Error Resume Next
Set w = Planilha4 ===> TORNAR ESSE CÓDIGO DE FORMA GLOBAL QUE POSSA USÁ-LA EM OUTRAS PLANS. E NÃO MULTIPLICAR O MESMO CÓDIGO.


t = w.Cells(w.Cells.Rows.Count, 2).End(xlUp).Row

Bom dia!!

Eu não compreendi muito bem, mas se tem usar uma rotina que vai mudar apenas a linha , sendo que terá usar em várias guias onde a mesma estará ativa, então tente: Ou então a ideia de Array: Se não for isso, tente explicar melhor, pois ainda não entendi.

Att

Olá Alexandre
Vcoê entedeu a minha dúvida perfeitamente, era isso que precisava

Grato
Marcelo Adriano