Put this macro into a Module on your sheet.
Sub ZeroTest()
If Range("AT214").Value = 0 Then
Rows("214:244").EntireRow.Hidden = True
Else
End If
If Range("AT245").Value = 0 Then
Rows("245:278").EntireRow.Hidden = True
Else
End If
If Range("AT279").Value = 0 Then
Rows("279:311").EntireRow.Hidden = True
Else
End If
If Range("AT312").Value = 0 Then
Rows("312:344").EntireRow.Hidden = True
Else
End If
If Range("AT345").Value = 0 Then
Rows("345:377").EntireRow.Hidden = True
Else
End If
If Range("AT378").Value = 0 Then
Rows("378:410").EntireRow.Hidden = True
Else
End If
End Sub
Bookmarks