Propiedad PivotField.CurrentPageList (Excel)
Devuelve o establece una matriz de cadenas correspondiente a la lista de elementos incluida en un campo de página de varios elementos de un informe de tabla dinámica. Variante de lectura y escritura.
Sintaxis
expresión. CurrentPageList
Expresión Variable que representa un objeto PivotField .
Comentarios
Para evitar errores en tiempo de ejecución, el origen de datos debe ser un origen OLAP, el campo elegido debe encontrarse actualmente en la posición Page y la propiedad EnableMultiplePageItems debe establecerse en True.
Ejemplo:
En este ejemplo se establece el campo de página para enumerar los elementos food del informe de tabla dinámica. Se supone que en la hoja de cálculo activa existe una tabla dinámica.
Sub UseCurrentPageList()
Dim pvtTable As PivotTable
Dim pvtField As PivotField
Set pvtTable = ActiveSheet.PivotTables(1)
Set pvtField = pvtTable.PivotFields("[Product]")
' To avoid run-time errors set the following property to True.
pvtTable.CubeFields("[Product]").EnableMultiplePageItems = True
' Set the page list to "Food".
pvtField.CurrentPageList = "[Product].[All Products].[Food]"
End Sub
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.