Run 1 Marco on multiple tabs w/1 button

[coma08]

I'm trying to run the same marco on multiple tabs by clicking on 1 button. Is it possible? thanks

Here's the code:

Sub HideRows()
Rows("17:548").EntireRow.Hidden = False
Dim cell As Range
For Each cell In Range("b17:b548")
If Not IsEmpty(cell) Then
If cell.Value = 0 Then
cell.EntireRow.Hidden = True
End If
End If
Next
End Sub

 

[Weaver]

not tested

Sub HideRows()    
    Dim cel As Range
    For Each ws In Worksheets
        With ws
            .Rows("17:548").EntireRow.Hidden = False
            For Each cel In .Range("b17:b548")
                If Not IsEmpty(cel) Then
                    If cel.Value = 0 Then
                        cel.EntireRow.Hidden = True
                    End If
                End If
            Next cel
        End With
    Next ws
End Sub

btw not good practice to use reserved words (like cell) for variable names

PS this will run on all sheets. If you need it to not run on some, then you're going to need another if statement inside the ws for...next loop, but I figure you can handle that

 

[coma08]

WORKS, thanks