Inhaltsverzeichnis
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.