VBA Error

[Jamm_027]

The code below was written in 03, worked fine in 07, but now in 10 it does not work. It returns a run time error that "no cells were found". Which is not true? There are over 3,000 rows it should delete.

Selection.AutoFilter Field:=6, Criteria1:="="
Range("F:F").SpecialCells(xlCellTypeBlanks).EntireRow.Delete

Not sure where to begin? Any help is greatly appreciated.

thanks,

jamm