VBA zum Aktualisieren der Pivot-Tabelle in Excel (5 Beispiele)

  • Teile Das
Hugh West

Umsetzung von VBA-Makro ist die effektivste, schnellste und sicherste Methode, um jede Operation in Excel auszuführen. In diesem Artikel zeigen wir Ihnen, wie Sie Aktualisieren Sie die Pivot-Tabelle in Excel mit VBA.

Arbeitsbuch herunterladen

Sie können die kostenlose Excel-Arbeitsmappe für die Praxis hier herunterladen.

Pivot-Tabelle mit VBA aktualisieren.xlsm

5 Beispiele zum Aktualisieren von Pivot-Tabellen mit VBA in Excel

Im Folgenden finden Sie ein Beispiel für eine Pivot-Tabelle, die wir im gesamten Artikel verwenden werden, und wir zeigen Ihnen 5 verschiedene Beispiele für Aktualisieren von Pivot-Tabellen in Excel mit VBA Code.

1) VBA zum Aktualisieren einer Pivot-Tabelle in Excel

Wenn Sie möchten, dass nur eine Pivot-Tabelle aktualisieren in Ihrem Excel-Arbeitsblatt,

  • Presse Alt + F11 auf Ihrer Tastatur oder gehen Sie auf die Registerkarte Entwickler -> Visual Basic zu öffnen Visual Basic-Editor .

  • Klicken Sie im Pop-up-Code-Fenster in der Menüleiste auf Einfügen -> Modul .

  • Kopieren Sie den folgenden Code und fügen Sie ihn in das Codefenster ein.
 Sub RefreshOnePivotTable() ActiveSheet.PivotTables("PivotTable1").RefreshTable End Sub 

Ihr Code ist nun einsatzbereit.

Hier, PivotTable1 ist der Name unserer Pivot-Tabelle. Sie schreiben den Namen, den Ihre Pivot-Tabelle hat.

  • Presse F5 auf Ihrer Tastatur oder wählen Sie in der Menüleiste Run -> Run Sub/UserForm Sie können auch einfach auf die Schaltfläche kleines Play-Symbol in der Untermenüleiste, um das Makro auszuführen.

Dies wird die Pivot-Tabelle aktualisieren in Ihrem bestehenden Excel-Arbeitsblatt.

Lesen Sie mehr: Pivot-Tabelle wird nicht aktualisiert (5 Probleme & Lösungen)

2) Makro zum Aktualisieren aller Pivot-Tabellen im aktiven Arbeitsblatt

So aktualisieren Sie alle Pivot-Tabellen im aktiven Arbeitsblatt folgen Sie den nachstehenden Schritten.

  • Auf die gleiche Weise wie zuvor, öffnen Sie Visual Basic-Editor von der Entwickler Registerkarte und einfügen. a Modul im Code-Fenster.
  • Kopieren Sie im Codefenster den folgenden Code und fügen Sie ihn ein.
 Sub RefreshActiveSheetPivotTables() Dim PivotTbl As PivotTable For Each PivotTbl In ActiveSheet.PivotTables PivotTbl.RefreshTable Next PivotTbl End Sub 

Ihr Code ist nun einsatzbereit.

  • ausführen. das Makro und alle Pivot-Tabellen in Ihrem aktiven Arbeitsblatt werden aufgefrischt.

Lesen Sie mehr: So aktualisieren Sie alle Pivot-Tabellen in Excel

3 VBA-Code zum Aktualisieren aller Pivot-Tabellen in mehreren Arbeitsmappen

Wenn Sie möchten, dass alle Pivot-Tabellen in mehreren Arbeitsmappen aktualisieren sofort mit VBA Code, dann sind die Schritte:

  • Öffnen Sie Visual Basic-Editor von der Entwickler Registerkarte und einfügen. a Modul im Code-Fenster.
  • Kopieren Sie im Codefenster den folgenden Code und fügen Sie ihn ein.
 Sub RefreshAllPivotTables() Dim PivotTbl As PivotTable For Each PivotTbl In ActiveWorkbook.PivotTables PivotTbl.RefreshTable Next PivotTbl End Sub 

Ihr Code ist nun einsatzbereit.

  • ausführen. den Code und alle Pivot-Tabellen in allen geöffneten Excel-Arbeitsmappen werden aktualisiert.

Erinnern Sie sich an alle Arbeitsmappen zu behalten öffnen während dieser Code ausgeführt wird.

Ähnliche Lektüre

  • Wie man eine Pivot-Tabelle in Excel bearbeitet (5 Methoden)
  • Pivot-Tabellenbereich aktualisieren (5 geeignete Methoden)
  • So aktualisieren Sie eine Pivot-Tabelle automatisch, wenn sich die Quelldaten ändern

4. den Pivot-Tabellen-Cache mit VBA in Excel aktualisieren

Wenn Sie mehrere Pivot-Tabellen in Ihrer Arbeitsmappe haben, die dieselben Daten verwenden, können Sie nur den Pivot-Tabellen-Cache aktualisieren Durch das Aktualisieren des Caches wird automatisch der Cache-Speicher aller Pivot-Tabellen gelöscht, die dieselbe Datenverbindung im Cache verwenden.

Die Schritte dazu sind,

  • Öffnen Sie Visual Basic-Editor von der Entwickler Registerkarte und einfügen. a Modul im Code-Fenster.
  • Kopieren Sie im Codefenster den folgenden Code und fügen Sie ihn ein.
 Sub RefreshPivotTableCache() Dim PivotCache As PivotCache For Each PivotCache In ActiveWorkbook.PivotCaches PivotCache.Refresh Next PivotCache End Sub 

Ihr Code ist nun einsatzbereit.

  • ausführen. der Code und alle Pivot-Tabellen-Cache-Speicher werden gelöscht.

Lesen Sie mehr: Automatische Aktualisierung der Pivot-Tabelle ohne VBA in Excel (3 intelligente Methoden)

5. automatische Aktualisierung der Pivot-Tabelle beim Ändern von Daten mit VBA-Makro

Was ist, wenn Sie eine Pivot-Tabelle mit einer großen Datenmenge haben und nur einige wenige Daten aktualisieren möchten, während die gesamte Tabelle unberührt bleibt? In Excel können Sie Automatisches Aktualisieren der Pivot-Tabelle während der Aktualisierung der Daten mit VBA .

  • Öffnen Sie Visual Basic-Editor von der Entwickler.
  • Auf der linken Seite des Editors befindet sich das Feld Projekt-Explorer der alle Namen des Arbeitsblatts enthält.
  • Unter Projekt-Explorer doppelklicken Sie auf den Blattnamen, der die Pivot-Tabelle enthält.

  • Es erscheint das Codefenster, in dem wir ein Ereignismakro erstellen. Wählen Sie Arbeitsblatt von der Objekt Dropdown-Feld auf der linken Seite des Codemoduls. Dadurch wird ein Arbeitsblatt_SelectionChange Ereignis an das Modul zu senden, brauchen wir es eigentlich nicht, also werden wir diesen Teil des Codes später löschen.
  • Klicken Sie dann auf das Symbol Verfahren Dropdown-Liste und wählen Sie Ändern Sie Dadurch wird ein neues Ereignis am Anfang des Codemoduls mit der Bezeichnung Arbeitsblatt_Ändern Wir werden unseren Code hier so schreiben löschen der Code, der von der Arbeitsblatt_SelectionChange

  • Kopieren Sie nun den folgenden Code und fügen Sie ihn in das Feld Arbeitsblatt_Ändern
 Private Sub Worksheet_Change(ByVal Target As Range) Worksheets("PivotTbl").PivotTables("PivotTable1").PivotCache.Refresh End Sub 

Ihr Code ist nun einsatzbereit.

Hier, PivotTbl ist der Name des Arbeitsblatts in unserer Excel-Arbeitsmappe und PivotTable1 ist der Name unserer Pivot-Tabelle. Sie schreiben den Namen, den Ihr Arbeitsblatt und die Pivot-Tabelle haben.

  • Jedes Mal, wenn Sie nun die Daten in der ursprünglichen Datentabelle in Ihrem Arbeitsblatt ändern, werden die Daten in der Pivot-Tabelle automatisch aktualisiert.

Lesen Sie mehr: Automatisches Aktualisieren der Pivot-Tabelle in Excel

Schlussfolgerung

Dieser Artikel zeigt Ihnen, wie Sie die Pivot-Tabelle aktualisieren in Excel mit VBA Ich hoffe, dass dieser Artikel für Sie von Nutzen war. Wenn Sie Fragen zum Thema haben, können Sie sich gerne an mich wenden.

Hugh West ist ein äußerst erfahrener Excel-Trainer und -Analyst mit über 10 Jahren Erfahrung in der Branche. Er verfügt über einen Bachelor-Abschluss in Rechnungswesen und Finanzen sowie einen Master-Abschluss in Betriebswirtschaft. Hugh hat eine Leidenschaft für das Unterrichten und hat einen einzigartigen Lehransatz entwickelt, der leicht zu befolgen und zu verstehen ist. Seine Expertenkenntnisse in Excel haben Tausenden von Studenten und Berufstätigen auf der ganzen Welt geholfen, ihre Fähigkeiten zu verbessern und in ihrer Karriere herausragende Leistungen zu erbringen. Über seinen Blog teilt Hugh sein Wissen mit der Welt und bietet kostenlose Excel-Tutorials und Online-Schulungen an, um Einzelpersonen und Unternehmen dabei zu helfen, ihr volles Potenzial auszuschöpfen.