Prev: Exception to password-protected document
Next: Copy or Move a spreadsheet
From: PBISMaryland on 12 May 2010 11:21
Hello. I have a workbook with 10 sheets all of which have external data that
needs to be refreshed periodically. Most of the time I only need to refresh
8 of the sheets. Is there a way to refresh just those 8 without having to
refresh each one separately?
Thanks in advance.
From: Jim Thomlinson on 12 May 2010 13:16
You can use a macro to do it. It would go something like this...

Sub RefreshSome()
Dim wks As Worksheet
Dim qt As QueryTable

For Each wks In Worksheets
Select Case wks.Name
Case "Sheet1", "sheet2"
Case Else
For Each qt In wks.QueryTables
qt.Refresh
Next qt
End Select
Next wks

End Sub

the above will refresh all querytables in all sheets excpet for sheet1 and
sheet2
--
HTH...

Jim Thomlinson


"PBISMaryland" wrote:

> Hello. I have a workbook with 10 sheets all of which have external data that
> needs to be refreshed periodically. Most of the time I only need to refresh
> 8 of the sheets. Is there a way to refresh just those 8 without having to
> refresh each one separately?
> Thanks in advance.
 | 
Pages: 1
Prev: Exception to password-protected document
Next: Copy or Move a spreadsheet