Refreshing External Data

[eggpap]

Hello,

the following macro performs only if I set one or more breakpoints in it.
If I run the macro without breakpoints I get one error that says the Data
refresment is impossible owing to the protection of some cells or graphs.
The external data are contained in the sheets A, B and C only.

Sub UpdateAll()
Sheets("A").Select
ActiveSheet.Unprotect
Sheets("B").Select
ActiveSheet.Unprotect
Sheets("C").Select
ActiveSheet.Unprotect
ActiveWorkbook.RefreshAll
ActiveSheet.Protect DrawingObjects:=True, Contents:=True,
Scenarios:=True
Sheets("B").Select
ActiveSheet.Protect DrawingObjects:=True, Contents:=True,
Scenarios:=True
Sheets("A").Select
ActiveSheet.Protect DrawingObjects:=True, Contents:=True,
Scenarios:=True
End Sub

Emiliano

 

[theSquirrel]

Hello,

the following macro performs only if I set one or more breakpoints in it.
If I run the macro without breakpoints I get one error that says the Data
refresment is impossible owing to the protection of some cells or graphs.
The external data are contained in the sheets A, B and C only.

Sub UpdateAll()
Sheets("A").Select
ActiveSheet.Unprotect
Sheets("B").Select
ActiveSheet.Unprotect
Sheets("C").Select
ActiveSheet.Unprotect
ActiveWorkbook.RefreshAll
ActiveSheet.Protect DrawingObjects:=True, Contents:=True,
Scenarios:=True
Sheets("B").Select
ActiveSheet.Protect DrawingObjects:=True, Contents:=True,
Scenarios:=True
Sheets("A").Select
ActiveSheet.Protect DrawingObjects:=True, Contents:=True,
Scenarios:=True
End Sub

Emiliano

From the sounds of it, with the breakpoints you are allowing time for
the refresing of the External Data. With the speed at which your code
runs will be much faster than even the fastest net connection to find,
process and populate the cells you are updating. You need to find a
way to slow down your code...

theSquirrel