rng.AutoFilter
rng.AutoFilter Field:=1, Criteria1:="=" & dtStart, Operator:=xlAnd, _
Criteria2:="<=" & dtEnd
.................................................. ..................

Above code should filter some data but only places dates in custom
window and nothing else.
Having run the code I checked the custom window of column1 and I found
that the dates are respectively there and correct. Just press OK
button and bingo ! Desired result appears.
Am I missing something here to activate OK button ?
Thanks