Excel VBA to Refresh All PivotTables With a Button

This video demonstrates how to create a button that will refresh all PivotTables within a workbook.
------------------------

[ginobilodeau]

Thank you, this is by far the most concise and functional video I found on the subject. Great Work!

[jacquesdutoitpvt]

Great video Chester - thanks so much. Was able to build my button by the 5min mark :)

[AkaExcel]

Chester Tugwell, thank you for your useful #Excel video!

[jeanpierre]

Is there a way to add a Time & Date after it refreshes?

[armanmontero]

Hi, just wanted to ask if how will I use the refresh all PT without the code interfering with the format of the other cells?

[shantanuwattamwar]

Hi .. is there way to know if refresh has been successful or failure.

[Lay-z-Panda]

I have a form that needs to be refreshed every a entry is submitted how could I donit

[AkaExcel]

I wish i know, how to autorefresh pivot table every "n" seconds... Have you experienced such issue?

[SolomonKinyanjui_sk]

Good work. How can i show PivotTables in Project explorer?

[ibadkhan]

It’s not working my source data is not in a table format

[paraskatoch]

Hello, Thank you for the video. I have a question here, I am trying to refresh pivot charts in the protected sheet having slicer. The problem is in the code. I ran the code, the charts gets refreshed and then the sheets gets protected again. However, the problem with my code is that my slicer stopped working. Can you help me with a code that my query still run, sheet remains protected and i can move my slicer. The only failure i am facing is not getting my slicer functional after the command. M not a VBA expert but this is the code i used -
Sub RefreshAllPivotTables()
ActiveSheet.Unprotect Password:=“Password”
ThisWorkbook.RefreshAll
ActiveSheet.Protect Password:=“Password”
End Sub
How can i click the check box in the option below the protect sheet using VBA. Looking for answers. Thanks in advance