system time run automatically when open file.

[JAMIR]

Hi,
I have module in my wrkbook for running system time. The code as follows.

Global clockOn As Boolean
Sub runClock()
Range("GatePass!L5").Value = Now()
If clockOn = True Then
Application.OnTime Now + TimeValue("00:00:01"), "runClock"
End If
End Sub

Sub startClock()
clockOn = True
runClock
End Sub

Sub stopClock()
clockOn = False
End Sub

But for Starting the Clock I have create Button for it. I just want to run the clock when open my workbook. How it will be work?

Regards,

Zameer

 

[Hui]

Add the following to the ThisWorkbook module in your Excel file

Private Sub Workbook_Open()
  Call runClock
End Sub

 

[JAMIR]

Hello Hui Sir,

I am feeling very greatful with your reply. Your above code i have add in my ThisWorkbook module. But i have already added one code for specific sheet open when open the file.

Private Sub Workbook_Open()
Worksheets("SoftTitle").Activate - "For desire sheet open."
End Sub

When i add above code it gave compile error. [Ambigous name detected Workbook_Open]

What should i do?

Regards,

Zameer

 

[NARAYANK991]

Hi Zameer ,

Since the code for what happens when you click the button is :

clockOn = True
runClock

just include the above two lines in your existing Workbook_Open macro ; you cannot have two macros named Workbook_Open.

Narayan

 

[JAMIR]

Good Morning Narayank991 Sir,

Its works! Cheers. I think we need coffee...

Regards,

Zameer.