Метод CubeField.CreatePivotFields (Excel)

Метод CreatePivotFields позволяет пользователям применять фильтр к полям сводных таблиц, еще не добавленным в сводную таблицу, путем создания соответствующего объекта PivotField.

Синтаксис

выражение. CreatePivotFields

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

Примечания

В сводных таблицах OLAP поля сводных таблиц не существуют, пока в сводную таблицу не будет добавлено соответствующее поле куба. Метод CreatePivotFields позволяет пользователям создавать все сводные поля кубического поля. Пользователи также могут добавлять фильтры к полям сводных таблиц и задавать им свойства перед добавлением поля куба в сводную таблицу.

Пример

Sub FilterFieldBeforeAddingItToPivotTable() 
 ActiveSheet.PivotTables("PivotTable1").CubeFields("[Date].[Fiscal]").CreatePivotFields 
 
 ActiveSheet.PivotTables("PivotTable1").PivotFields("[Date].[Fiscal].[Fiscal Year]").VisibleItemsList = 
 
 "[Date].[Fiscal].[Fiscal Semester]").VisibleItemsList = Array("") 
 ActiveSheet.PivotTables("PivotTable1").PivotFields( _ 
 "[Date].[Fiscal].[Fiscal Quarter]").VisibleItemsList = Array("") 
 
 ActiveSheet.PivotTables("PivotTable1").PivotFields("[Date].[Fiscal].[Month]"). _ 
 VisibleItemsList = Array("") 
 
 ActiveSheet.PivotTables("PivotTable1").PivotFields("[Date].[Fiscal].[Date]"). _ 
 VisibleItemsList = Array("") 
End Sub

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

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