Новости:

Из правил форума: Тема должна отражать суть вопроса, топики типа "help please" будут удаляться!

Главное меню

несколько критериев авто фильтра

Автор Anyuta, 18.03.2014, 19:56

« назад - далее »

Anyuta

Здравствуйте!
Столкнулась с небольшой проблемой, помогите пожалуйста!
мне нужно макросом в экселе отфильтровать строки с датой текущего месяца и предыдущего, по отдельности макрорекодером записала:
Sub Фильтр_по_сроку()
ActiveSheet.Range("Срок_поставки").AutoFilter Field:=22, Criteria1:= _
xlFilterThisMonth, Operator:=xlFilterDynamic 'текущий месяц
ActiveSheet.Range("Срок_поставки").AutoFilter Field:=22, Criteria1:= _
xlFilterLastMonth, Operator:=xlFilterDynamic 'прошлый месяц
End Sub

Но как соединить эти два критерия, что бы код был примерно таким?...
Sub Фильтр_по_сроку2()
ActiveSheet.Range("Срок_поставки").AutoFilter Field:=22, Criteria1:=Array("xlFilterThisMonth", "xlFilterLastMonth"), Operator:=xlFilterDynamic
End Sub

видимо есть какие то тонкости в записи, никак не могу разобраться!
Заранее огромное спасибо любому совету!

RAN

#1
 Anyuta, бросьте вы это дело!
На днях сунулся - то тут не так, то тут не эдак, то при ошибке вместо игнорирования ошибки Excel вылетает...
Ей-ей, руками проще сделать. Да и труд не велик.
Я, по крайней мере, плюнул.

Criteria1:=Array("xlFilterThisMonth", "xlFilterLastMonth")

Макрорекордер 2007 пишет
Criteria2:=Array("xlFilterThisMonth", "xlFilterLastMonth")

Ну или что-то такое.

Anyuta

#2
RAN, ясно, спасибо за совет!

Еще вопрос по теме: возможно ли отфильтровать строки по нескольким критериям:
либо значение ячейки больше 90%, либо равно "-", либо с любым текстом?
или сюда тоже лучше не соваться?

RAN