So aktualisieren Sie die Daten in einem PivotTable-Bericht automatisch:

Schritt 1: Aktualisieren Sie automatisch den Quelldatenbereich Name

Siehe Tipp: Automatische Aktualisierung einer Bereichsnamenreferenz.

Schritt 2: Hinzufügen eines VBA-Ereignisses zum automatischen Aktualisieren des PivotTable-Berichts 1. Drücken Sie Alt + F11 und doppelklicken Sie dann auf den Blattnamen im VBAProject-Bereich.

  1. Wählen Sie in der linken Dropdown-Liste über dem Modulblatt die Option Arbeitsblatt und in der rechten Dropdown-Liste die Option Aktivieren.

  2. Kopieren Sie den folgenden Code und fügen Sie ihn in das Modulblatt ein.

    • Private Sub Worksheet_Activate ()

ActiveSheet.PivotTables („PivotTable1“). PivotCache.Refresh End Sub * {leer} 4. Drücken Sie Strg + S, um die Arbeitsmappe zu speichern, und drücken Sie dann Alt + F4, um die VBA zu schließen. Der PivotTable-Bericht wird automatisch aktualisiert, wenn Sie das Blatt auswählen, das ihn enthält.

Hinweis: Um den PivotTable-Berichtsnamen zu finden (in diesem Beispiel „PivotTable1“), wählen Sie PivotTable-Tools → Optionen → PivotTable-Name (unter PivotTable-Optionen).