Метод PivotTable.AddDataField (Excel)

Добавляет поле данных в отчет сводной таблицы. Возвращает объект PivotField , представляющий новое поле данных.

Синтаксис

expression. AddDataField (Field, Caption, Function)

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

Параметры

Имя	Обязательный или необязательный	Тип данных	Описание
Field	Обязательный	Object	Уникальное поле на сервере. Если исходные данные являются оперативной аналитической обработкой (OLAP), уникальным полем является поле куба. Если исходные данные не являются OLAP (исходными данными, не OLAP), уникальным полем является поле сводной таблицы.
Caption	Необязательный	Variant	Метка, используемая в отчете сводной таблицы для идентификации этого поля данных.
Function	Необязательный	Variant	Функция, выполняемая в добавленном поле данных.

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

PivotField

Пример

В этом примере в сводную таблицу с именем 1 добавляется поле данных с именем Total Score. В этом примере предполагается, что существует таблица, в которой один из столбцов содержит столбец с именем Score.

Sub AddMoreFields() 
 
 With ActiveSheet.PivotTables("PivotTable1") 
 .AddDataField ActiveSheet.PivotTables( _ 
 "PivotTable1").PivotFields("Score"), "Total Score" 
 End With 
 
End Sub

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

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