Hide rows based on a cell value in a column



Sub HideRows()
On Error Resume Next
With Range("A2:B800")
.EntireRow.Hidden = False
For i = 1 To .Rows.Count
If WorksheetFunction.Sum(.Rows(i)) = 0 Then
.Rows(i).EntireRow.Hidden = True
End If
Next i
End With
End Sub

If you mean by saying that cells containing 0 really are cells containing nothing, then you can substitute the line:

If WorksheetFunction.Sum(.Rows(i)) = 0 Then

With:

If WorksheetFunction.CountBlank(.Rows(i)) = 2 Then