Hallo Excelprofis,
ich möchte gerne in einer Datei alle vorhandenen Pivottabellen über ein Makro aktualisieren. Damit der Code nicht so ellenlang wird, habe ich das aufgezeichnete Makro des Recorders etwas gekürzt.
Das Einzige was mir jetzt noch missfällt ist, dass die Pivottabellen als absolute Bezüge, sprich die Namen drin stehen.
Sheets("Tabelle1").PivotTables("PivotTable2").PivotCache.Refresh
Sheets("Tabelle2").PivotTables("PivotTable1").PivotCache.Refresh
Sheets("Tabelle3").PivotTables("PivotTable1").PivotCache.Refresh
Sheets("Tabelle4").PivotTables("PivotTable2").PivotCache.Refresh
Lässt sich das irgendwie eleganter lösen? Im Grunde soll er in den entsprechenden Tabellenblättern alle vorhandenen Pivottabellen aktualsieren.
Danke für Eure Hilfe im Voraus!
Grüße,
Melanie