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