I am trying to filter a table with an array, but the table is only being filtered by the last element. What am I doing wrong?
Code:
dim varI as variant, arrT() as variant
dim ws1 as worksheet
Dim loTBL As ListObject
Dim intSGL As Integer
arrT = Array("101000", "109000", "131000", "131900")
For Each varI In arrT
Debug.Print varI
Next varI
20126 ws1.AutoFilterMode = False
20127 loTBL.Range.AutoFilter Field:=intSGL, Criteria1:=arrT
Last edited: