kann mir vielleicht jemend die Befehlszeile dafür nennen, wie ich alle in einer Datei enthaltenen Pivot-Tabellen auf einmal per VBA aktualisieren kann?
Gruß Manfred
Sub Piv_Alle_Aktualisieren()
Dim ws As Worksheet
Dim pt As PivotTable
For Each ws In ActiveWorkbook.Worksheets
For Each pt In ws.PivotTables
pt.PivotCache.Refresh
Next pt
Next ws
End Sub
GrußSub ttt()
Dim PC As PivotCache
For Each PC In ActiveWorkbook.PivotCaches
PC.Refresh
Next
End Sub