Свойство PivotTable.CubeFields (Excel)

Возвращает коллекцию CubeFields . Каждый объект CubeField содержит свойства элемента поля куба. Только для чтения.

Синтаксис

expression. CubeFields

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

Пример

В этом примере создается список имен полей куба для полей данных в первом отчете сводной таблицы на основе OLAP на листе Sheet1.

Set objNewSheet = Worksheets.Add 
objNewSheet.Activate 
intRow = 1 
For Each objCubeFld In Worksheets("Sheet1").PivotTables(1).CubeFields 
 If objCubeFld.Orientation = xlDataField Then 
 objNewSheet.Cells(intRow, 1).Value = objCubeFld.Name 
 intRow = intRow + 1 
 End If 
Next objCubeFld

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

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