Отображение списка сводных таблиц с их параметрами

У меня есть книга со многими листами со многими сводными таблицами. Было бы здорово иметь обзор всех этих сводных таблиц в одном месте, чтобы убедиться, что у меня есть согласованные параметры, заголовки и т. д.

Он должен отображать ключевую информацию, такую ​​как:

Имя рабочего листа, имя сводной таблицы, местоположение сводной таблицы, гиперссылка на местоположение, выбранные параметры (такие как поддержка OLAP, текущие подключенные слайсеры и т. д., тип (мощный сводной или стандартный)

Я думаю, мы все были бы счастливы иметь это для всех наших сложных приложений. Кто-нибудь знает, как спроектировать это в VBA или что-то еще?


person user1573375    schedule 03.08.2012    source источник
comment
Можете ли вы показать нам, что вы пробовали и где вы застряли?   -  person Siddharth Rout    schedule 03.08.2012
comment
Извините, но я не могу понять, с чего начать. Теперь у меня более 50 сводок в этом файле, и каким-то образом один из них включает функцию OLAP, и мои слайсеры больше не работают должным образом. Я хотел бы иметь этот список где-нибудь, чтобы я мог легко найти опорную точку с неисправным параметром. Я уверен, что я не единственный с этой проблемой, кто-нибудь нашел решение?   -  person user1573375    schedule 16.08.2012


Ответы (1)


Вы должны иметь возможность просматривать сводные таблицы и получать информацию с помощью чего-то вроде:

Dim pvt As PivotTable
Dim ws As Worksheet
Set ws = ThisWorkBook.ActiveSheet
For Each pvt In ws.PivotTables

'collect data about pivot tables and output somewhere..
Next pvt

если сводные таблицы находятся на нескольких рабочих листах, тогда вложите этот цикл в цикл, который циклически перемещается по рабочим листам рабочих книг.

Является ли это адекватной отправной точкой для вас?

person Sam    schedule 05.12.2012