SaveData Property Example
This example sets the PivotTable report to save data with the workbook.
Set pvtTable = Worksheets("Sheet1").Range("A3").PivotTable pvtTable.SaveData = True