How can I convert this code for a blank cell instead of PD & ND?

Sub Test2()
With Cells(1).CurrentRegion
    .AutoFilter 8, Array("PD", "ND"), Operator:=xlFilterValues
    .Offset(1).EntireRow.Delete
    .AutoFilter
End With
End Sub