Здравствуйте.
Суть проблемы в следующем - имеется сводная таблица в которой посредством применения фильтров исключаются из расчёта часть значений
Задача - определить кол-во видимых строк в таблице в столбце "Сортамент"

Пробовал вот так
ActiveSheet.PivotTables("Раскрой").PivotFields("Сортамент").Visibleitems.count
выдаёт 7, полное кол-во элементов, а в самой таблице видно лишь 1 строку в столбце "Сортамент"

Точнее через VB из нескольких таблиц создаётся сводная таблица. Далее включением фильтров исключаются не нужные значения. Оставшиеся значения необходимо собрать из сводной таблицы для дальнейшего анализа