Как я могу использовать фильтр по нескольким данным (список) в VBA

Question

Я хочу использовать фильтр по нескольким данным в Excel VBA. в первый раз, Я использовал метод for и find, но он слишком медленный для обработки.

В случае Python, используйте «модули Pandas» и фрейм данных, как показано ниже filter = dataframe ['headername "]. isin ([Listdata1, Listdata2, Listdata3 ..])

но я не смог найти подобный метод в VBA.

Вот мои фоновые данные 1 :

Answer 1

Sub MultiSelectFilter()

    Dim arr As Variant

    ' Range containing values to be shown
    arr = Range("C1:C3")

    ' Range to be filtered
    Range("A1").AutoFilter
    Range("A1").AutoFilter Field:=1, Criteria1:=Application.Transpose(arr), Operator:=xlFilterValues
End Sub