Pivottabellen automatisch aktualisieren
martin
Ich aktualisiere bis jetzt meine Pivottabellen über folgenden Code:
Private Sub Worksheet_Activate()
Dim pt As PivotTable
For Each pt In Me.PivotTables
pt.RefreshTable
Next
End Sub
dabei muss ich ja immer das Tabellenbaltt neu aktivieren auch wenn ich bereits in dem Tabellenblatt mit der Pivottabelle bin.
Jetzt möchte ich aber das sich die Pivottabelle auch dann automatisch aktualisiert wenn ich in dem Tabellenblatt in dem die Pivottabelle steht etwas verändere also z.B. einen bestehenden Wert in einer Zelle ausserhalb der Pivottabelle eingebe/verändere.
Gibt es so was ?
Danke schon mal für Eure Hilfe
Martin
Anzeige