Метод PivotTable.DrillUp (Excel)

Статья
04/07/2023

Позволяет детализировать данные в иерархии кубов на основе OLAP или PowerPivot.

Синтаксис

expression. Детализация (PivotItem, PivotLine, LevelUniqueName)

Выражение Переменная, представляющая объект сводной таблицы .

Параметры

Имя	Обязательный или необязательный	Тип данных	Описание
PivotItem	Обязательный	PIVOTITEM	Элемент, из которого выполняется детализация.
Сводная линия	Необязательный	Variant	Указывает строку в сводной таблице, где находится начальный элемент операции. В случаях, когда сводная линия не указана, по умолчанию используется верхняя сводная линия, в которой отображается элемент.
LevelUniqueName	Необязательный	Variant	Целевой объект для многоуровневой детализации. Действие по умолчанию, если оно не указано, — это детализация на один уровень.

Возвращаемое значение

VOID

Пример

В следующем примере кода демонстрируется одноуровневая детализация сводной таблицы.

ActiveSheet.PivotTables("PivotTable1").DrillUp ActiveSheet.PivotTables( _
      "PivotTable1").PivotFields("[Customer].[Customer Geography].[Postal Code]"). _
      PivotItems( _
      "[Customer].[Customer Geography].[Postal Code].&[2450]&[Coffs Harbour]"), _
      ActiveSheet.PivotTables("PivotTable1").PivotRowAxis.PivotLines(1)

В следующем примере кода демонстрируется детализация уровня для сводной диаграммы.

ActiveChart.PivotLayout.PivotTable.DrillUp ActiveChart.PivotLayout.PivotTable. _
      PivotFields("[Customer].[Customer Geography].[Postal Code]").PivotItems( _
      "[Customer].[Customer Geography].[Postal Code].&[2450]&[Coffs Harbour]"), _
      ActiveChart.PivotLayout.PivotTable.PivotRowAxis.PivotLines(1)

В следующем примере кода демонстрируется многоуровневая детализация сводной таблицы.

ActiveSheet.PivotTables("PivotTable1").DrillUp ActiveSheet.PivotTables( _
     "PivotTable1").PivotFields("[Customer].[Customer Geography].[City]").PivotItems _
     ("[Customer].[Customer Geography].[City].&[Coffs Harbour]&[NSW]"), ActiveSheet. _
     PivotTables("PivotTable1").PivotRowAxis.PivotLines(1), _
     "[Customer].[Customer Geography].[Country]"

В следующем примере кода демонстрируется многоуровневая детализация сводной диаграммы.

ActiveChart.PivotLayout.PivotTable.DrillUp ActiveChart.PivotLayout.PivotTable. _
     PivotFields("[Customer].[Customer Geography].[Postal Code]").PivotItems( _
     "[Customer].[Customer Geography].[Postal Code].&[2450]&[Coffs Harbour]"), _
     ActiveChart.PivotLayout.PivotTable.PivotRowAxis.PivotLines(1) , _
     "[Customer].[Customer Geography].[Country]"

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.

Поделиться через