Automatically starting code

R

Richard

The code works fine, but how and where do you put it for it to start
automatically. I have it in a Module but I have to manually go in and run it
from there.
Sub clock()
If ThisWorkbook.Worksheets(1).Range("C2").Value = "X" Then Exit Sub
ThisWorkbook.Worksheets(1).Range("G2").Value = Format(Now, "hh:mm:ss AM/PM")
Application.OnTime Now + TimeSerial(0, 0, 60), "clock"
End Sub
Thanks in Advance!
 
J

JMB

You could put it in the ThisWorkBook module, and declare it as an event
handler, such as:

Private Sub Workbook_Open()
'your code here
End Sub

This example would run whenever the workbook is opened. If you click on the
drop down boxes in the ThisWorkBook module you'll see there are a variety of
events to which you could attach your code.
 
R

Richard

Clock will change to current time but will not run continually if I put it in
Private Sub Workbook_Open()
 
J

JMB

I think all you need to do is call your sub from the event handler. It looks
like your sub uses OnTime to call itself to do the updating.

Private Sub Workbook_Open()
Call Clock
End Sub
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Top