Für bestimmte Arten der Datenanalyse können PivotTables sehr praktisch sein. Wenn Sie eine Arbeitsmappe haben, die mehrere PivotTables enthält, die alle auf denselben Daten basieren, fragen Sie sich möglicherweise, ob es eine Möglichkeit gibt, alle auf einmal zu aktualisieren, anstatt sie einzeln durchzugehen und zu aktualisieren.

Es gibt keinen Excel-Befehl, mit dem Sie alle PivotTables aktualisieren können, aber Sie können ein kurzes Makro erstellen, das die Aufgabe für Sie erledigt. Das folgende Makro, RefreshAllPivots, durchläuft jedes Arbeitsblatt in einer Arbeitsmappe, prüft, ob PivotTables vorhanden sind, und aktualisiert sie gegebenenfalls.

Sub RefreshAllPivots()

Dim wks As Worksheet     Dim pt As PivotTable

For Each wks In Worksheets         For Each pt In wks.PivotTables             pt.RefreshTable         Next pt     Next wks End Sub

Wenn Sie viel mit mehreren PivotTables arbeiten, möchten Sie das Makro möglicherweise einer Tastenkombination oder der Symbolleiste für den Schnellzugriff zuweisen, damit Sie es einfacher ausführen können.

_Hinweis: _

Wenn Sie wissen möchten, wie die auf dieser Seite (oder auf einer anderen Seite der ExcelTips-Websites) beschriebenen Makros verwendet werden, habe ich eine spezielle Seite vorbereitet, die hilfreiche Informationen enthält.

Klicken Sie hier, um diese spezielle Seite in einem neuen Browser-Tab zu öffnen.

ExcelTips ist Ihre Quelle für kostengünstige Microsoft Excel-Schulungen.

Dieser Tipp (5675) gilt für Microsoft Excel 2007, 2010 und 2013. Eine Version dieses Tippes für die ältere Menüoberfläche von Excel finden Sie hier:

Mehrere PivotTables gleichzeitig aktualisieren.