Как заставить переменную получить несколько значений из одной ячейки и использовать ее в качестве критерия автофильтра

Question

У меня есть одна ячейка с несколькими значениями, иногда она может иметь только одно значение или может содержать 10/20 и так далее.Я хочу использовать эту информацию о конкретной ячейке в качестве критерия для автофильтрации.Все значения в этой ячейке используют запятую между.

Я пробовал много комбинаций массив / транспонирование / диапазон, но безуспешно

Sub Filtro()

Dim FILTROMANUAL As Variant

Set FILTROMANUAL = Sheets("21.03 a 20.04").Range("AL7")

ActiveSheet.Range("$A:$AH").AutoFilter Field:=28, Criteria1:=FILTROMANUAL, Operator:=xlFilterValues

End Sub

Answer 1

Вам нужен массив значений. Использование Split в ячейке даст вам:

ActiveSheet.Range("$A:$AH").AutoFilter Field:=28, Criteria1:=Split(FILTROMANUAL.Value, ","), Operator:=xlFilterValues