Indholdsfortegnelse
I denne artikel vil jeg vise dig, hvordan du kan opdatere alle pivottabellerne i dit regneark eller din arbejdsbog med VBA i Excel. Du vil også lære at opdatere en enkelt pivottabel , samt den Pivottabel cache.
Opdater alle pivottabeller med VBA i Excel (hurtig visning)
Dim Table As PivotTable For Each Table In ActiveWorkbook.PivotTables Table.RefreshTable Next Table 
Dette vil opdatere alle de Pivottabeller i den aktive projektmappe.
Download arbejdsbog til øvelser
Download denne arbejdsbog til træning, så du kan øve dig, mens du læser denne artikel.
Opdater alle pivottabeller.xlsm4 måder at opdatere alle pivottabeller med VBA i Excel på
A Pivottabel er en særlig type tabel i et Excel-regneark, der indeholder to kategorier af data, der hedder Række og Værdi henholdsvis.
Alle kolonnerne i tabellen er kategoriseret under disse to kategorier.
Den genereres automatisk fra et datasæt, hvis du vælger datasættet og går til Indsæt> PivotTable i Excel-værktøjslinjen.
I dag er vores mål at lære, hvordan vi kan genopfriske alle de Pivottabeller af et regneark eller en arbejdsbog med VBA i Excel.
1. Opdater en enkelt pivottabel i Excel
Først lærer vi at opdatere en enkelt Pivottabel .
For at opdatere en enkelt Pivottabel , først skal du henvise til det som en PivotTable objekt.
Så skal du bruge RefreshTable metode til VBA .
Her har vi en Pivottabel kaldet PivotTabel1 i det aktive regneark. (Klik her for at få mere at vide hvordan du får navnet på Pivot Table ).
For at opdatere den skal vi bruge følgende kodelinjer:
Dim Table1 As PivotTable Set Table1 = ActiveSheet.PivotTables("PivotTable1") Table1.RefreshTable 
Kør koden, og den vil opdatere Pivottabel kaldet PivotTabel1 i det aktive regneark.
Læs mere: Sådan opdaterer du automatisk pivottabellen i Excel (2 metoder)
2. Opdater alle pivottabellerne i et regneark i Excel
Nu opdaterer vi alle de Pivottabeller af et regneark med VBA .
For at opdatere alle de Pivottabeller i det aktive regneark, skal du gennemløbe hvert enkelt Pivottabel af den ActiveSheet.PivotTables objektet. Brug derefter RefreshTable metode.
Dim Table As PivotTable For Each Table In ActiveSheet.PivotTables Table.RefreshTable Next Table 
Kør koden, og den vil opdatere alle pivottabellerne i det aktive regneark.
Læs mere: Pivot tabel opdaterer ikke (5 problemer & Løsninger)
3. Opdater alle pivottabellerne i en arbejdsbog i Excel
Du kan også opdatere alle de Pivottabeller af en arbejdsbog i Excel.
For at opdatere alle de Pivottabeller i den aktive projektmappe, gennemløber du hver tabel ved hjælp af ActiveWorkbook.PivotTables objekt af VBA Brug derefter RefreshTable metode.
Dim Table As PivotTable For Each Table In ActiveWorkbook.PivotTables Table.RefreshTable Next Table
Denne kode vil opdatere alle de Pivottabeller i den aktive projektmappe.
Læs mere: Sådan opdateres en pivottabel automatisk, når kildedata ændres
4. Opdater cachen for pivottabellen med VBA i Excel
Hvis du har flere Pivottabeller i din projektmappe, der bruger de samme data, bør du opdatere Pivot tabel cache i stedet for at genopfriske Pivottabel .
For at opdatere den Pivot tabel cache , gennemløber hver Pivot tabel cache af den aktive projektmappe ved hjælp af ActiveWorkbook.PivotCaches objekt.
Brug derefter R efresh metode til VBA .
Dim Cache As PivotCache For Each Cache In ActiveWorkbook.PivotCaches Cache.Refresh Next Cache 
Det vil opdatere alle Pivot tabel cache fra den aktive projektmappe.
Læs mere: Sådan opdaterer du automatisk pivottabellen uden VBA i Excel (3 smarte metoder)
Ting at huske
Her har vi vist at opdatere Pivottabeller kun fra det aktive regneark eller arbejdsmappe. Hvis du vil opdatere data fra en arbejdsmappe eller et regneark, der ikke er aktivt, skal du bruge navnet på regnearket eller arbejdsmappen i stedet for ActiveSheet eller eller ActiveWorkbook objekt.
Hvis du f.eks. vil opdatere alle Pivottabeller fra Ark1 , bruge For Each Table In Worksheets("Sheet1").PivotTables .
Og for at genopfriske fra Arbejdsbog1 , bruge For Each Table In Workbooks("Workbook1").PivotTables .
Konklusion
Ved hjælp af disse metoder kan du opdatere alle de Pivottabeller fra et regneark eller en arbejdsbog med VBA i Excel. Har du spørgsmål, er du velkommen til at stille dem til os.
