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


Метод PivotField.AddPageItem (Excel)

Добавляет дополнительный элемент в поле страницы с несколькими элементами.

Синтаксис

expression. AddPageItem (Item, ClearList)

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

Параметры

Имя Обязательный или необязательный Тип данных Описание
Элемент Обязательный String Исходное имя объекта PivotItem , соответствующее уникальному имени члена OLAP.
ClearList Необязательный Variant Если значение false (по умолчанию), добавляет элемент страницы в существующий список. Если задано значение True, удаляет все текущие элементы и добавляет элемент.

Замечания

Чтобы избежать ошибок во время выполнения, источник данных должен быть источником OLAP, выбранное поле должно находиться в положении страницы, а свойство EnableMultiplePageItems должно иметь значение True.

Пример

В этом примере Microsoft Excel добавляет элемент страницы с исходным именем "[Product]. [Все продукты]. [Еда]. [Яйца]". В этом примере предполагается, что на активном листе существует сводная таблица OLAP.

Sub UseAddPageItem() 
 
 ' The source is an OLAP database and you can manually reorder items. 
 ActiveSheet.PivotTables(1).CubeFields("[Product]"). _ 
 EnableMultiplePageItems = True 
 
 ' Add the page item titled "[Product].[All Products].[Food].[Eggs]". 
 ActiveSheet.PivotTables(1).PivotFields("[Product]").AddPageItem ( _ 
 "[Product].[All Products].[Food].[Eggs]") 
 
End Sub

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

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