Como ejecutar una macro en todas las hojas de un libro
Estoy trabajando en excel 2010 con una macro que saca promedios de grupos de 3 filas por columna sin repetir filas. La macro funciona bien pero quiero repetir ese proceso para todas las hojas de Excel (son 70 hojas), sin tener que hacerlo hoja por hoja, todas tienen exactamente el mismo formato por lo que en teoría la macro debe funcionar en cada una de ellas.
La macro en la que trabajo va asi:
Sub Macro2()
'
' Macro2 Macro
'
For i = 5 To 238 Step 3
For j = 2 To 51
Cells(i + 235, j).Activate
ActiveCell.Value = "=SUM(R[-235]C:R[-233]C)/3"
Next j
Next i
For fila = 240 To 317
For col = 2 To 51
If Cells(fila, col).Value = "" Then
Rows(fila).Delete
End If
Next col
Next fila
Range("A240").Value = "1"
Range("A241").Value = "2"
Range("A240:A241").Select
Selection.AutoFill Destination:=Range("A240:A317"), Type:=xlFillDefault
End Sub