Try

Range("a1").AutoFilter Field:=4, Criteria1:="=" & DateSerial(2005,5,27), _
Operator:=xlAnd, Criteria2:="<=" & DateSerial(2004,6,3)

--
Regards,
Tom Ogilvy

"PPesola" wrote in message
...
When i run my autofilter code, range with autofilter is empty ( except
autofilter columns ). Then if i select "(Custom...)" in autofilter list i
can see correct dates in criteria fields and after i cick OK, Autofilter
filter and show correct rows.

my autofilter code;

Range("a1").AutoFilter Field:=4, Criteria1:="=27.5.2004" ,
Operator:=xlAnd, Criteria2:="<=3.6.2004"

I'm using Excel 97 and Windows XP Pro