Ескертпе
Бұл бетке кіру үшін қатынас шегін айқындау қажет. Жүйеге кіруді немесе каталогтарды өзгертуді байқап көруге болады.
Бұл бетке кіру үшін қатынас шегін айқындау қажет. Каталогтарды өзгертуді байқап көруге болады.
Добавляет ссылку на сводную таблицу в коллекцию SlicerPivotTables .
Синтаксис
expression. Добавить сводную таблицу (сводная таблица)
выражение Переменная, представляющая объект SlicerPivotTables .
Параметры
| Имя | Обязательный или необязательный | Тип данных | Описание |
|---|---|---|---|
| PivotTable | Обязательный | PivotTable | Объект сводной таблицы , представляющий добавляемую сводную таблицу. |
Возвращаемое значение
Отсутствует
Примечания
При добавлении сводной таблицы в коллекцию SlicerPivotTables ее можно отфильтровать по ее родительской slicerCache и связанным с ней срезам.
Пример
В следующем примере кода сводная таблица1 добавляется в кэш среза, связанный с срезом Customer.
Dim pvts As SlicerPivotTables
Set pvts = ActiveWorkbook.SlicerCaches("Slicer_Customer").PivotTables
pvts.AddPivotTable(ActiveSheet.PivotTables("PivotTable1"))
Поддержка и обратная связь
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.