PivotTable automatisch aktualisieren
22.04.2015 16:39:26
Michael
folgenden Problem. Ich hab Pivot Tabellen und daraus generiere ich Diagramme die ich in einem ANDEREN Sheet als die Pivot Tabellen platziert hab. Jetzt hab ich das Problem, dass die Daten sich nicht in den Sheets wo die Diagramme sind automatisch aktulisieren sondern nur in den Sheets mit den Tabellen. Hierfür verwende ich folgenden Code
Private Sub Workbook_SheetActivate(ByVal Sh As Object)
Dim pt As PivotTable
For Each pt In Sh.PivotTables
pt.RefreshTable
Next
End Sub
Gruß
Michael