RefreshDate Property Example

This example displays the date on which the PivotTable report was last refreshed.

Set pvtTable = Worksheets("Sheet1").Range("A3").PivotTable
dateString = Format(pvtTable.RefreshDate, "Long Date")
MsgBox "The data was last refreshed on " & dateString