I can't get result run the macro

[AT BABU]

Hi All,

I create below macro, Macro runing. but I cna't get result

Sub MyAutofilter()
Dim st As Long, en As Long
st = Range("s1").Value '''''''''assume this is the start date
en = Range("t1").Value ''''''assume this is the end date
Range("A1:I1").AutoFilter

ActiveSheet.Range("G2:G1500").AutoFilter Field:=7, Criteria1:= _
">=& st", Operator:=xlAnd, Criteria2:="<=& en"
End Sub

 

[jmacleary]

Hi there. Try replacing

ActiveSheet.Range("G2:G1500").AutoFilter Field:=7, Criteria1:= _
        ">=& st", Operator:=xlAnd, Criteria2:="<=& en"

with

ActiveSheet.Range("G2:G1500").AutoFilter Field:=7, Criteria1:= _
        ">="& st, Operator:=xlAnd, Criteria2:="<="& en

 

[AT BABU]

Thank you jmacleary