Hi AsparAgus
,
in your code, 1 is setting the both criteria1 and criteria2 to be applied on same field(column).
Range("B6:B2000", "D6:D2000").AutoFilter 1, Criteria1:=">" & stDate, _
Operator:=xlAnd, Criteria2:="<" & stDate1
As you have two different columns, you need to put your code...