Misma macro para distintos excel

Hola, tengo una serie de datos en distintas hojas de Excel (mismas filas y columnas) y necesito ejecutar un macro con las mismas operaciones para las distintas hojas, llamando a este macro desde otro inicial que es el que debe de llamar al anterior. Ayuda. Muchas gracias.

Pongo un ejemplo de lo que busco, pero no me funciona:

Macro de llamada al otro macro y las hojas:

Sub inicial()
Dim g As Byte
'For g = 1 To 3 'tengo 3 hojas
'Sheets(g).Select 'comienza con la primer hoja
'Call suma
'Next g
End Sub

Macro para realizar las operaciones:

Sub suma()
Dim l As Integer
Dim g As Byte

Dim i As Integer


Range("B1").End(xlDown).Select
l = ActiveCell.Row
Sheets(g).Cells(3, "D") = l


For i = 2 To l
Sheets(g).Cells(5, "D") = Sheets(g).Cells(5, "D") + Sheets(g).Cells(i, "B")
Next i
End Sub

Añade tu respuesta

Haz clic para o