So you want a toggle
[vba]
Sub HideRows()
Dim i As Long
With ActiveSheet
For i = .Cells(.Rows.Count, 1).End(xlUp).Row To 1 Step -1
If .Cells(i, 3) = 0 Or .Cells(i, 4) = 0 Or .Cells(i, 5) = 0 Then
.Rows(i).Hidden = Not .Rows(i).Hidden
End If
Next i
End With
End Sub
[/vba]