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
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!