Selection.AutoFilter Field:=18, Criteria1:="<" & Sheets _
("Code").Range("J2").Value

--
Regards,
Tom Ogilvy

"scrabtree" wrote in message
...
Here is a code:

Selection.AutoFilter Field:=18, Criteria1:=Sheets
("Code").Range("J2").Value

This code works fine; however, I need it to filter to
everything that does not equeal Sheets("Code").Range
("J2").Value not everything that equals it?