'unable to get the specialcells property of the range class'

[fatduck]

Hi there
I'm trying to set up a macro to scan column 'b' for the text 'Aus', and then to copy the entire row to a second sheet each time it finds it. But I keep getting this error.
My code is:

Range("b:b").Select
Selection.SpecialCells(xlCellTypeConstants, "Aus").EntireRow.Copy Destination:=Sheets("Sheet1").Range("a2")

Thanks so much if you can help!
Daniel

 

[jindon]

SpecialCells method can't find value such like "Aus".
Use AutoFilter

 

[fatduck]

Ahh I see. Ok, thanks very much! I'll try autofilter!