Dear all,

how to set the array as variable

 ActiveSheet.Range("$A$1:$M$20000").AutoFilter Field:=3, Criteria1:=Array(Sheets("Summary").Cells(1, 1).Value), Operator:=xlFilterValues
Cells(1, 1).Value = "10", "11", "12","1", "2", "3"