Date of Pivot Table refresh (2003 / 11.5612.5703)

[gwmills]

Is there a way to add a field to a spreadsheet displaying the date (or date and time) of the last pivot table refresh?

[Andrew Cronnolly]

From Version 2002 onwards, Excel has a worksheet event that can help you.

The following code will insert the date and time in A1, when PivotTable1 is refreshed.

Private Sub Worksheet_PivotTableUpdate(ByVal Target As PivotTable)
If Target = PivotTables("PivotTable1") Then [A1] = Now
End Sub

Right click on the sheet tab of the sheet containting th ePivotTable and place that code in the codepane, changing the Cell to receive teh date as required, and the PivotTable name if necessary.

Andrew C

[gwmills]

Thanks Andrew. That works great!