Run Macro on Open

[karldugan]

Hi all,

I've got the below macro, if I run it once, then the timer starts and it will keep saving every 10mins but unless I first run the macro, the timer doesn't seem to start. How do I set it so the macro either runs straight away when opened (and so kick starts the timer) or start the timer as soon as the file is opened?

Thanks for ny help.
Karl.

Sub Save()

Dim Duration, Start

Duration = 600
Start = Timer
Do While Timer < Start + Duration
DoEvents
Loop

ActiveWorkbook.Save
MsgBox ("File Saved")

Save
End Sub

 

[Joe4]

If you use the Workbook_Open event procedure in VBA, your code will run automatically whenever you open the workbook (as long as VBA/Macros are enabled).
You would simply put the body of your code in this procedure.

Note: NEVER used reserved words like "Save" as the name of your procedures, functions, or variables ("reserved words" are words already used by Excel as the names of functions, properties, methods, or objects). It can cause errors and unexpected results (i.e. when you try to reference "Save", Excel could get confused, as it cannot be sure if you are trying to "Save" the file or call the "Save" procedure).

If you aren't sure if a word is reserved or not, I usually just preface it with "My", to be sure, i.e. "MySave".