Buttons help please

[rlowe]

Hi everyone.
I have the following code, basically it hides any lines with a value of 0 in the AH column.
How do I put this in a button, click to run macro, then click to turn off macro and unhide lines.
Im stressing out over this biggest brain fart in the world.

Private Sub CommandButton1_Click()
Sub HideRows()
Application.ScreenUpdating = False
Application.Calculation = xlManual

For Each c In Range("AH4:AH146")
If c.Value = 0 And c.Value <> "" Then Rows(c.Row).Hidden = True
Next

Application.Calculation = xlAutomatic
Application.ScreenUpdating = True
End Sub

[rlowe]

i bet someone is going to solve this in 2 seconds and im gonna feel reall dooshy

[Fotis1991]

unfortunately:

This is a duplicate post and as such does not comply with Rule 5 of our forum rules. This thread will now be closed, you may continue in your other thread.

Thread Closed.