Pivot Tabelle automatisch aktualisieren

Pivot Tabellen werden auf Basis von Ursprungsdaten erzeugt. Wenn wir nun den Bereich der Ursprungsdaten dynamisch gehalten haben, ändern sich natürlich auch die Werte der Pivottabelle.

Diese Änderung der Pivottabelle muss aber entweder manuell erzwungen werden oder zum Beispiel im Activate Ereignis des Tabellenblattes ausgelöst werden.

Dazu reicht nachstehender kleiner Code Private Sub Worksheet_Activate() Dim pt As PivotTable For Each pt In Me.PivotTables pt.RefreshTable Next End Sub

Wem das Thema Pivot neu oder noch nicht ganz vertraut ist kann ich empfehlen sich das kostenlose online Tutorial Pivot hier herunter zu laden.

>>>Zum Pivot Tutorial (mit Beispieldatei und Lösungsansatz)Share on Facebook

Read more http://vba-codeschnipsel.de/pivot-tabelle-automatisch-aktualisieren/