Hi everone,

Could someone please tell me what is wrong with this small piece of
code, note that Zone5 is cell name ( I am getting error in the 2nd
row):

If Zone5 0 Then
Cell(Zone5).Select
Selection.EntireRow.Hidden = True
End If
If Zone4 0 Then
Cell("Zone4").Select
Selection.EntireRow.Hidden = True
End If
If Zone3 0 Then
Cell("Zone3").Select
Selection.EntireRow.Hidden = True
End If
If Zone2 0 Then
Cell("Zone2").Select
Selection.EntireRow.Hidden = True
End If

Thanks,
Jo