Добавление третьего критерия в автофильтр VBA - PullRequest
0 голосов
/ 05 сентября 2018

Я хотел бы добавить дополнительный 3-й критерий к написанному мною коду, который автоматически фильтрует значения «RENT» и «emprent» в заданном диапазоне. Я хотел бы добавить «РТНА» в качестве третьего критерия.

Sheets("Filter").Activate
With ActiveSheet
    .AutoFilterMode = False
    .Range("P1:W10000").AutoFilter Field:=1, Criteria1:=Array("RENT", "rtna", _
                                    "emprent"), _
                    Operator:=xlFilterValues
End With
...