Команда в VBA для подсчета отфильтрованных строк

[Nigguz]

У меня есть вопрос по excel.
Возможно ли написать макрос, который будет поэтапно
открывать в фильтре строчки... ну например
мясо
колбаса
сметана
и т.д.
После каждого названия подсчитывать сколько на странице после фильтра
строк с таким именем и вставлять это значение в определенную ячейку?
Спасибо

[EugeneS]

такого результата можно добиться и без макроса, формулами или сводной таблицей, нет примера - нет ответа

[SAS888]

Например, так:

x = Sheets(1).AutoFilter.Range.Columns(1).SpecialCells(xlVisible).Count

Можно добавить проверки: установлен ли автофильтр, применен ли автофильтр и т.п.

[Nigguz]

Спасибо) Попробую)