Actualizar tablas dinamicas
Para actualizar las tablas dinámicas lo hacer de la siguiente forma:
Private Sub Actualiza_Dinamicas() 'actualiza las hojas incluyendo la tabla dinamica.
Application.EnableEvents = False 'inhabilitamos eventos del excel(como el actualización automática en los cálculos)
Sheets("Nombre del sheet").PivotTables("Nombre de la tabla dinamica").PivotCache.Refresh
Application.EnableEvents = True 'volvemos activar luego de la ejecución del macro
End Sub
Comentarios
Publicar un comentario