Propriedade PivotTable.CubeFields (Excel)

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

Sintaxe

expressão. Campos de Cubo

expressão Uma variável que representa um objeto de tabela dinâmica .

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.