Iam trying to auto filter a data range based on criteria passed from a list box selections.I want the auto filter to be filtering column 2 of the data range based on ALL the items SELECTED from a multi-select list box (named listbox2) at the click of a button. Here is what i currently have:
Sub Cmd1_Click() Application.ScreenUpdating = False For i = 0 To ListBox2.ListCount - 1 If Me.ListBox2.Selected(i) Then Range("A3:C600").AutoFilter Field:=2, Criteria1:=ListBox2.List(i), Operator:=xlFilterValues End If Next i Application.ScreenUpdating = True End Sub
It works, only that it filters the data by ONLY the last selected value of the list(i.e only one value item in the list). I want it to loop through ALL the selections, applying filter on column 2 based on EACH of the selections on the list box.
Thanks in anticipation.