Vba code for multiple criteria

[Aman Semwal]

Hi,

Need help with my code below:

ActiveSheet.Range("$A:$S").AutoFilter Field:=1, Criteria1:=Array( _
Worksheets(2).Range("A2").Value), Operator:=xlFilterValues

Worksheets(2).Range("A2").Value = "1","2","3"

This doesn't filter the 1,2,3 from the cell A2.


But when i go with below code it filter the set of range with the criteria.

ActiveSheet.Range("$A:$S").AutoFilter Field:=1, Criteria1:=Array( _
"1","2","3"), Operator:=xlFilterValues

why cant i filter it when i use it with cell value ?

 

[vletm]

Aman Semwal
Worksheet(2).range("A2").value is not array!
You could eg Google and find:
https://stackoverflow.com/questions/38404176/using-string-array-as-criteria-in-vba-autofilter
http://vbadud.blogspot.com/2010/07/excel-vba-autofilter-specify-multiple.html

 

[p45cal]

try:

Worksheets(2).Range("A2").Value = "1,2,3"
ActiveSheet.Range("$A:$S").AutoFilter Field:=1, Criteria1:=Split(Worksheets(2).Range("A2").Value, ","), Operator:=xlFilterValues