Fjerne rækker - forskel på 0 og Null

Hej, jeg har lavet følgende Makro til at fjerne rækker med 0 i kolonne H.

Columns("A:A").Select
I = ActiveCell.SpecialCells(xlLastCell).Row
Do While I > 0
    Range("H" + CStr(I)).Activate
    If ActiveCell.Value = 0 Then
            Rows(I).Select
            Selection.Delete Shift:=xlUp
    End If
    I = I - 1
Loop

Mit problem er, at den også fjerner de rækker hvor cellen i række H er tom. (så kan jeg lære at tage backup, når jeg leger med makroer.. )


Hvordan skelner jeg mellem 0 og Null, så jeg undgår at fjerne for meget?