Update or Refresh All Pivot Tables in Excel VBA

Grab the Free VBA Quick Reference Guide
https://www.chrisjterrell.com/excel-vba-quick-reference-guide/
The question often times comes up if you have a bunch of pivot tables in a workbook is there a way to update or refresh all of them in an easy way using a macro.

The answer is yes.

Code
==============
Sub Refreshpivots()

ThisWorkbook.RefreshAll

'Old way to do this by looping through all the sheets
For Each ws In ThisWorkbook.Sheets
For Each pvt In ws.PivotTables
pvt.RefreshTable
pvt.Update
Next
Next
MsgBox "Pivots Updated"

End Sub

Видео Update or Refresh All Pivot Tables in Excel VBA канала EverydayVBA