Hur uppdaterar man automatiskt en pivottabell i Excel?

När vi uppdaterar källdata för en pivottabell uppdateras normalt inte pivottabellen förrän vi klickar Analysera > refresh manuellt. Detta kommer att bli ganska tråkigt om pivottabellen finns kvar i ett annat kalkylblad och du kanske glömmer att uppdatera det. Här kommer den här artikeln att introducera en VBA för att automatiskt uppdatera en pivottabell i Excel.

Uppdatera automatiskt en pivottabell av VBA

Uppdatera automatiskt en pivottabell av VBA

Följ stegen nedan för att tillämpa VBA för att automatiskt uppdatera den angivna pivottabellen i Excel.

1. Högerklicka på arkfliken som innehåller källdata i flikfältet Ark och välj Visa kod i snabbmenyn. Se skärmdump:

2. I fönstret Microsoft Visual Basic för applikationer klistrar du in koden.

VBA: Auto uppdatera den angivna pivottabellen

Private Sub Worksheet_Change(ByVal Target As Range)
 Worksheets("sheet name").PivotTables("PivotTable name").PivotCache.Refresh
 End Sub

Anmärkningar:
(1) I koden för kalkylblad ("bladnamn"). Pivottabeller ("Pivottabellnamn"). PivotCache.Refresh, vänligen byt ut bladnamn med namnet på arket som innehåller den angivna pivottabellen och ersätt Pivottabellnamn med namnet på den angivna pivottabellen.
(2) Välj vilken cell som helst i den angivna pivottabellen, du får dess namn på Analysera flik (eller Montering flik). Se skärmdump:

3. Spara koden.

Från och med nu när du ändrar data i källdata uppdateras den angivna pivottabellen automatiskt.

Relaterade artiklar:

Hur gör man i genomsnitt per dag / månad / kvartal / timme med pivottabell i Excel?