¿Cómo actualizar la tabla dinámica cuando los datos cambian en Excel?

Como sabes, si cambias los datos en la tabla original, la tabla dinámica relacionada no actualiza los datos al mismo tiempo. Si necesitas actualizar la tabla dinámica cuando los datos cambian en la tabla de Excel, puedo mostrarte algunas formas rápidas de hacerlo.

Actualizar tabla dinámica en una hoja de cálculo presionando Actualizar

Actualizar tabla dinámica en una hoja de cálculo o libro con VBA

Actualizar tabla dinámica en una hoja de cálculo presionando Actualizar

En Excel, hay una función Actualizar y Actualizar todo para actualizar la tabla dinámica en una sola hoja de cálculo.

Haz clic en la tabla dinámica que deseas actualizar y luego haz clic en Opciones (en Excel 2013, haz clic en ANALIZAR) > Actualizar > Actualizar. Ver captura de pantalla:

Si deseas actualizar todas las tablas dinámicas en una sola hoja de cálculo, puedes seleccionar Actualizar todo.

Actualizar tabla dinámica en una hoja de cálculo o libro con VBA

Con VBA, no solo puedes actualizar todas las tablas dinámicas en una sola hoja de cálculo, sino también actualizar todas las tablas dinámicas en el libro completo.

1. Presiona las teclas F11 + Alt juntas en el teclado para abrir la ventana de Microsoft Visual Basic para Aplicaciones.

2. Luego haz clic en Insertar > Módulo para insertar una nueva ventana de módulo. Luego copia el siguiente código VBA en la ventana.

VBA: Actualizar tablas dinámicas en una hoja de cálculo.

Sub AllWorksheetPivots()
'Updateby20140724
Dim xTable As PivotTable
For Each xTable In Application.ActiveSheet.PivotTables
    xTable.RefreshTable
Next
End Sub

3. Haz clic en el botón Ejecutar en la ventana o presiona la tecla F5 para ejecutar el VBA, luego las tablas dinámicas en la hoja de cálculo se actualizarán.

Consejo: Para actualizar todas las tablas dinámicas en un libro completo, puedes usar el siguiente VBA.

VBA: Actualizar todas las tablas dinámicas en un libro.

Sub RefreshAllPivotTables()
'Updateby20140724
Dim xWs As Worksheet
Dim xTable As PivotTable
For Each xWs In Application.ActiveWorkbook.Worksheets
    For Each xTable In xWs.PivotTables
        xTable.RefreshTable
    Next
Next
End Sub

Artículos Relacionados:

• Actualizar tabla dinámica al abrir archivo en Excel
• Actualizar rango de datos de la tabla dinámica en Excel