gibbo1715
12-19-2005, 05:35 AM
an someone tell me how i can set up my auto filter to filter on more than one criteria or on more than one field?
Tried this but didnt work for me
Sub Testing()
Dim iLastRow As Long
'Find the last row containing data
iLastRow = Cells(Rows.Count, "A").End(xlUp).Row
ActiveSheet.Range("A1:F" & iLastRow).AutoFilter Field:=3, Criteria1:="<>A", Criteria2:="<>E"
End Sub
cheers
gibbo
Tried this but didnt work for me
Sub Testing()
Dim iLastRow As Long
'Find the last row containing data
iLastRow = Cells(Rows.Count, "A").End(xlUp).Row
ActiveSheet.Range("A1:F" & iLastRow).AutoFilter Field:=3, Criteria1:="<>A", Criteria2:="<>E"
End Sub
cheers
gibbo