Страницы: 1
RSS
Фильтрация с несколькими критериями по первым символам
 
Всем привет!
При использовании сразу польшого числа критериев фильтрации приходится прописывать их полностью, например:

Код
[A3:H3].AutoFilter Field:=4, Criteria1:=Array("Первый критерий", "Второй критерий", "Третий критерий", "Четвертый критерий"), Operator:=xlFilterValues

Но в реале они не на столько короткие как в примере. Есть ли способ вместо них использовать хотя бы первое слово или его часть?
Например вместо "Первый критерий", вносить что-то вроде "Перв*" Вариант со звездочкой вместо неопределенного количества символов в случае с фильтрацией не катит.
 
Придумал по-другому. Цикл и дополнительный столбец для фильтрации.

Код
lr = Cells(Rows.Count, 1).End(xlUp).Row
For s = 4 To lr
    If Cells(s, 4).Value Like "Перв*" Then Cells(s, 5) = "A"
    If Cells(s, 4).Value Like "Втор*" Then Cells(s, 5) = "A"
Next
[A:E].AutoFilter Field:=5, Criteria1:="A"
Изменено: IvanMantrov - 01.11.2019 16:10:22
Страницы: 1
Наверх