Nota:
El acceso a esta página requiere autorización. Puede intentar iniciar sesión o cambiar directorios.
El acceso a esta página requiere autorización. Puede intentar cambiar los directorios.
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
más sencilla.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 seleccionado debe estar actualmente en la posición Página y la propiedad EnableMultiplePageItems debe estar establecida en True.
Ejemplo
En este ejemplo se establece el campo de página para mostrar los alimentos 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.