In diesem Beispiel wird der Cache für den ersten PivotTable-Bericht auf dem ersten Tabellenblatt beim Aufbau optimiert.
Worksheets(1).PivotTables("Pivot1") _ .PivotCache.OptimizeCache = True