Propiedad PivotTable.CubeFields (Excel)
Devuelve la colección CubeFields . Cada objeto CubeField contiene las propiedades del elemento de campo de cubo. Solo lectura.
Sintaxis
expresión. CubeFields
Expresión Variable que representa un objeto PivotTable .
Ejemplo:
En este ejemplo se crea una lista de nombres de campo de cubo para los campos de datos del primer informe de tabla dinámica basado en OLAP de 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
Soporte técnico y comentarios
¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.