Saltar al contenido

Actualizar Tabla dinámica en Formulario


Recommended Posts

Necesito ayuda para solucionar este problema: En una hoja de excel 365, construí varias tablas dinámicas que apuntan a un rango de datos en la misma tabla. Invoco una forma con campos combo y los alimento del resultado de las tablas dinámicas. Al invocar un procedimiento de evento en los campos del formulario y desde este punto acceder a las tablas dinámicas se genera un error.

Private Sub ListaCodLoc_Change()
    Dim WSD As Worksheet
    '
    Set WSD = Worksheets("Anex IV_SpectrumAuct")
    WSD.Select
    WSD.Activate
    '
    WSD.PivotTables("TD_DEPTO").PivotFields("NUMERO").CurrentPage = "(All)" <-- en esta instrucción se genera el error "no se puede obtener la propiedad PivotFields de la clase PivotTable"
   WSD.PivotTables("TD_DEPTO").PivotCache.Refresh   

   WSD.PivotTables("TD_DEPTO").PivotFields("NUMERO").CurrentPage = ListaCodLoc.Value

End Sub

Si el código lo ejecuto en una macro tradicional, funciona correctamente......Gracias por la ayuda!

Enlace a comentario
Compartir con otras webs

Archivado

Este tema está ahora archivado y está cerrado a más respuestas.

×
×
  • Crear nuevo...

Información importante

Echa un vistazo a nuestra política de cookies para ayudarte a tener una mejor experiencia de navegación. Puedes ajustar aquí la configuración. Pulsa el botón Aceptar, si estás de acuerdo.