Установить автоматическую фильтрацию нескольких подстановочных знаков
Прямо сейчас я делаю кодирование, чтобы установить фильтр для диаграммы данных. В основном я неЯ не знаю, как разместить лист данных здесь, поэтому просто попробуйте набрать их):
(слева начинается столбец A) Имя * BDevice * Количество * Продажа * Владелец
В основном мне нужно отфильтровать по 2 столбцу: - BDevice с любым словом содержать "M1454" или же "M1467" или же "M1879" (Это означает, что M1454A или M1467TR все еще подходят) -Владелец с PROD или RISK
Вот код, который я написал:
Sub AutoFilter()
ActiveWorkbook.ActiveSheet..Range(B:B).Select
Selection.Autofilter Field:=1 Criteria1:=Array( _
"*M1454*", "*M1467*", "*M1879*"), Operator:=xlFilterValues
Selection.AutoFilter Field:=4 Criteria1:="=PROD" _
, Operator:=xlOr, Criteria2:="=RISK"
End Sub
Когда я запускаю код, машина возвращает ошибку 1004, и часть, которая кажется неправильной, является частью фильтра 2 (я не уверен в использовании Field, поэтому не могу сказать точно)
Редактировать; Сантош: Когда я пробую ваш код, машина выходит из-под ошибки 9. Ошибка пришла от оператора with. (поскольку таблица данных имеет столбец от A до AS, поэтому я просто изменяю на A: AS)