Try this

With ActiveSheet.Range("E3:O10000")
.AutoFilter Field:=1, Criteria1:="<=" & Format(Edate, "dd-mmm")
.AutoFilter Field:=11, Criteria1:="="
End With

note that you need to use a date format that the worksheet uses.

--

HTH

RP
(remove nothere from the email address if mailing direct)


"asmenut" wrote in message
...
Is it possible to "Nest" autofilters? Reason for question is that I need
to
autofilter my data log and search through all records (via Column "O")
that
is equal to blank, but also through column E where criteria <= Ending
date.

Example:

TextFilter1 = ActiveSheet.Range("E3:E10000").AutoFilter _
Field:=1, Criteria1:="<=" & EDate

ActiveSheet.Range("O3:O10000").AutoFilter _
Field:=1, Criteria1:="=", Operator:=xlAnd _
, Criteria2:="TestFilter1"