In diesem Beispiel wird der Aktualisierungszeitraum für den PivotTable-Cache ("PivotTable3") auf 15 Minuten festgelegt.
Set objPC = Worksheets("Sheet1").PivotTables("PivotTable3").PivotCache objPC.RefreshPeriod = 15