Compartir vía


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.