Ескертпе
Бұл бетке кіру үшін қатынас шегін айқындау қажет. Жүйеге кіруді немесе каталогтарды өзгертуді байқап көруге болады.
Бұл бетке кіру үшін қатынас шегін айқындау қажет. Каталогтарды өзгертуді байқап көруге болады.
Добавляет дополнительный элемент в поле страницы с несколькими элементами.
Синтаксис
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 и обратная связь.