Deleting Rows with "#N/A"

[hammer2]

Hi Folks

I use this Code to delete rows with "0"

Sub DelRows2()
    Application.ScreenUpdating = False
    With Range("H1", Range("H" & Rows.Count).End(xlUp))
        .AutoFilter field:=1, Criteria1:="0"
        .Offset(1).EntireRow.Delete
        .AutoFilter
    End With
    Application.ScreenUpdating = True
End Sub

But I want to delete rows where a Formula returns #N/A Changing the Criteria1 above to "#N/A" does not work.
Ideas please
Cheers
Hammer