Propriedade PivotTable.CubeFields (Excel)

Retorna a coleção CubeFields. Cada objeto CubeField contém as propriedades do elemento de campo do cubo. Somente leitura.

Sintaxe

expressão. CubeFields

expressão Uma variável que representa um objeto PivotTable.

Exemplo

Este exemplo cria uma lista de nomes de campo de cubo para os campos de dados no primeiro relatório de tabela dinâmica baseado em OLAP em 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

Suporte e comentários

Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.