Using VBA to control pivot tables

[EIMS]

I have created pivot tables in Excel 2000 which do not work in Excel 2003 - I think Excel 2003 tries to refresh it too many times and says that it cannot open pivot table source file. Is there a way to use VBA to get around this probelm with Excel 2003? If so could someone tell me how to do it...

 

[Erdinç E. Karaçam]

PivotTable's sheet's code page:

Private Sub Worksheet_Activate()
    Application.OnTime Now + TimeValue("00:00:05"), "RefreshPivotTable"
End Sub

And,

To Module1:

Sub RefreshPivotTable()
    Sheets("PivotTablePage").PivotTables("TheNameOfPivotTable").PivotCache.Refresh
End Sub

This sample refreshing the PivotTable every 5 seconds.

You can change the time set.