Autofilter Everything Except one condition

[nniedzielski]

I used the macro recorder to get me this far, but I have this and it is returning everything:

ActiveSheet.Range("A:G").AutoFilter Field:=5, Criteria1:="<>001"

I want everything except 001 returned to me.

thank you,

 

[JustynaMK]

Hi nniedzielski,

Please try the following:
ActiveSheet.Range("A:G").AutoFilter Field:=5, Criteria1:="<>*001*"

 

[nniedzielski]

couple of stars, thank you,