Inhaltsverzeichnis
In diesem Artikel zeige ich Ihnen, wie Sie alle Pivot-Tabellen Ihres Arbeitsblatts oder Ihrer Arbeitsmappe mit VBA in Excel aktualisieren. Sie werden auch lernen eine einzelne Pivot-Tabelle aktualisieren sowie die Pivot-Tabelle Cache.
Alle Pivot-Tabellen mit VBA in Excel aktualisieren (Schnellansicht)
Dim Table As PivotTable For Each Table In ActiveWorkbook.PivotTables Table.RefreshTable Next Table 
Dadurch werden alle Pivot-Tabellen der aktiven Arbeitsmappe.
Download Arbeitsbuch Praxis
Laden Sie dieses Übungsheft herunter, um zu üben, während Sie diesen Artikel lesen.
Alle Pivot-Tabellen aktualisieren.xlsm4 Möglichkeiten zum Aktualisieren aller Pivot-Tabellen mit VBA in Excel
A Pivot-Tabelle ist ein spezieller Tabellentyp in einem Excel-Arbeitsblatt, der zwei Kategorien von Daten enthält, die mit Reihe und Wert beziehungsweise.
Alle Spalten der Tabelle sind in diese beiden Kategorien unterteilt.
Sie wird automatisch aus einem Datensatz generiert, wenn Sie den Datensatz auswählen und in den Bereich Einfügen> PivotTable in der Excel-Symbolleiste.
Heute wollen wir lernen, wie wir alle Informationen auffrischen können. Pivot-Tabellen eines Arbeitsblatts oder einer Arbeitsmappe mit VBA in Excel.
1. eine einzelne Pivot-Tabelle in Excel aktualisieren
Zunächst werden wir lernen, eine einzelne Pivot-Tabelle .
Zur Aktualisierung einer einzelnen Pivot-Tabelle müssen Sie es zunächst als PivotTable Objekt.
Dann müssen Sie die RefreshTable Methode der VBA .
Hier haben wir eine Pivot-Tabelle genannt. PivotTable1 im aktiven Arbeitsblatt (Klicken Sie hier, um zu erfahren wie man den Namen der Pivot-Tabelle erhält ).
Um sie zu aktualisieren, müssen wir die folgenden Codezeilen verwenden:
Dim Table1 As PivotTable Set Table1 = ActiveSheet.PivotTables("PivotTable1") Table1.RefreshTable 
Führen Sie den Code aus, und er aktualisiert die Pivot-Tabelle genannt. PivotTable1 im aktiven Arbeitsblatt.
Lesen Sie mehr: Automatische Aktualisierung der Pivot-Tabelle in Excel (2 Methoden)
2. alle Pivot-Tabellen eines Arbeitsblatts in Excel aktualisieren
Jetzt aktualisieren wir alle Pivot-Tabellen eines Arbeitsblattes mit VBA .
Zur Aktualisierung aller Pivot-Tabellen des aktiven Arbeitsblatts, müssen Sie durch jedes Pivot-Tabelle der ActiveSheet.PivotTables Verwenden Sie dann das Objekt RefreshTable Methode.
Dim Table As PivotTable For Each Table In ActiveSheet.PivotTables Table.RefreshTable Next Table 
Führen Sie den Code aus, und er wird alle Pivot-Tabellen aktualisieren des aktiven Arbeitsblatts.
Lesen Sie mehr: Pivot-Tabelle wird nicht aktualisiert (5 Probleme & Lösungen)
3. alle Pivot-Tabellen einer Arbeitsmappe in Excel aktualisieren
Sie können auch alle Pivot-Tabellen einer Arbeitsmappe in Excel.
Zur Aktualisierung aller Pivot-Tabellen der aktiven Arbeitsmappe, iterieren Sie durch jede Tabelle nach dem ActiveWorkbook.PivotTables Gegenstand von VBA Dann verwenden Sie die RefreshTable Methode.
Dim Table As PivotTable For Each Table In ActiveWorkbook.PivotTables Table.RefreshTable Next Table
Dieser Code aktualisiert alle Pivot-Tabellen der aktiven Arbeitsmappe.
Lesen Sie mehr: Automatisches Aktualisieren einer Pivot-Tabelle bei Änderungen der Quelldaten
4. den Pivot-Tabellen-Cache mit VBA in Excel aktualisieren
Wenn Sie mehrere Pivot-Tabellen in Ihrer Arbeitsmappe, die dieselben Daten verwenden, aktualisieren Sie besser die Pivot-Tabellen-Cache als die Aktualisierung der Pivot-Tabelle .
Zum Aktualisieren der Pivot-Tabellen-Cache iterieren Sie durch jede Pivot-Tabellen-Cache der aktiven Arbeitsmappe durch die ActiveWorkbook.PivotCaches Objekt.
Verwenden Sie dann den R efresh Methode der VBA .
Dim Cache As PivotCache For Each Cache In ActiveWorkbook.PivotCaches Cache.Refresh Next Cache 
Sie aktualisiert alle Pivot-Tabellen-Cache aus der aktiven Arbeitsmappe.
Lesen Sie mehr: Automatische Aktualisierung der Pivot-Tabelle ohne VBA in Excel (3 intelligente Methoden)
Dinge zum Merken
Hier haben wir gezeigt, wie man die Pivot-Tabellen Wenn Sie Daten aus einer Arbeitsmappe oder einem Arbeitsblatt aktualisieren möchten, das nicht aktiv ist, verwenden Sie den Namen des Arbeitsblatts oder der Arbeitsmappe anstelle des Zeichens ActiveSheet oder die ActiveWorkbook Objekt.
Zum Beispiel, um alle Pivot-Tabellen von Blatt1 verwenden For Each Table In Worksheets("Sheet1").PivotTables .
Und zur Auffrischung von Arbeitsbuch1 verwenden For Each Table In Workbooks("Arbeitsmappe1").PivotTables .
Schlussfolgerung
Mit diesen Methoden können Sie alle Pivot-Tabellen aus einem Arbeitsblatt oder einer Arbeitsmappe mit VBA Wenn Sie Fragen haben, können Sie uns diese gerne stellen.
