Refreshing all pivot tables in workbook

[Guest]

Hi,

I'm trying to programmatically update all pivot tables in my workbook
without referring any one in particular.

The code that I have so far isn't working. Here is the code:

For Each ws In ActiveWorkbook.Worksheets
For Each pt In ws.PivotTables
pt.PivotCache.Refresh
Next pt
Next ws

What am I doing wrong? When I run this code, it virtually freezed my file.
Eventually after an hour I believe it might work, but I was wondering if
there was more efficient code to do the trick.

Thanks,
Kent.

 

[Guest]

Replace
pt.PivotCache.Refresh
with
pt.RefreshTable

 

[Guest]

Thanks Jim :-D

 

[Guest]

Hi Jim,

I integrated your code and the same thing happens. Excel is inoperable for
at least 20 minutes.... There has to be a reason why it practically hangs....
I'll post again tomorrow with the code.

Thanks!

 

[Jig]

I use

ActiveWorkbook.RefreshAll

 

[Guest]

Thanks Jig