On open prompt to 'Refresh All'

[Adam]

Hi All,

I have a spreadsheet which has an external data range and then two
pivot tables feeding off of that worksheet page.

Is it possible that when the spreadsheet is opened it prompts the user
if they want to refresh all.

If they select Yes then this would refresh the external data and then
update the two pivot tables?

Many Thanks

Adam

Office 97

 

[Dave Peterson]

If you rightclick on the pivottable, you can choose "Table Options"

At the bottom of that dialog is an option to "refresh on open".

It sounds like it fits the bill.

 

[Adam]

That won't work because the External data needs to update before the
pivot tables are updated.

 

[Dave Peterson]

Maybe a macro?

Option Explicit
Sub auto_open()
ThisWorkbook.RefreshAll
End Sub