Макрос Excel 2007: необходимо отфильтровать таблицу, оставив "все кроме"

программирование excel visual basic эксель макрос

необходимо отфильтровать таблицу, оставив "все кроме"
Простой вариант макроса :

ActiveSheet.Range("$A$2:$G$200").AutoFilter Field:=7, Criteria1:=Array( _
"01", "03", "04", "07", "08"), Operator:=xlFilterValues

не подходит, так как он создает масив из оставшихся результатов.
Необходимо что-то вроде:

ActiveSheet.Range("$A$2:$G$200").AutoFilter Field:=7, Criteria1:=Array( _
"<>02", "<>05", "<>06", "<>09", "<>10"), Operator:=xlFilterValues

но это, естественно, неправильно.

Такой вариант:

ActiveSheet.Range("$A$2:$G$200").AutoFilter Field:=7, Criteria1:= _
"<>02*", Operator:=xlAnd, Criteria2:="<>05"

не подходит, так как работает только для двух элементов.
У меня таких элементов около 200.

Заранее спасибо за помощь.
Ответы:
В данной ситуации целесообразнее, на мой взгляд, воспользоваться
Расширенным фильтром, при этом код будет выглядеть примерно так:


14 лет назад

RPI.su - самая большая русскоязычная база вопросов и ответов. Наш проект был реализован как продолжение популярного сервиса otvety.google.ru, который был закрыт и удален 30 апреля 2015 года. Мы решили воскресить полезный сервис Ответы Гугл, чтобы любой человек смог публично узнать ответ на свой вопрос у интернет сообщества.

Все вопросы, добавленные на сайт ответов Google, мы скопировали и сохранили здесь. Имена старых пользователей также отображены в том виде, в котором они существовали ранее. Только нужно заново пройти регистрацию, чтобы иметь возможность задавать вопросы, или отвечать другим.

Чтобы связаться с нами по любому вопросу О САЙТЕ (реклама, сотрудничество, отзыв о сервисе), пишите на почту [email protected]. Только все общие вопросы размещайте на сайте, на них ответ по почте не предоставляется.