Create A Stopwatch in Excel

[hrayani]

Hello To All,

How can i input a stopwatch in excel sheet with a Start, Stop, and Reset Button....

Awaiting reply,

Humayun

 

[VoG]

Hi. Here's an example http://www.vbaexpress.com/kb/getarticle.php?kb_id=242

 

[hrayani]

Thanks Vog

I will have a loot at it now and will let you know shortly

Regards,

Humayun

 

[hrayani]

Dear Vog

I just downloaded the file.... But, i want a stopwatch with a Start, Stop and Reset button on the sheet...

Whereas, the one you told me is without any buttons and also i am unable to stop it...

Can u help me??

Humayun

 

[VoG]

Perhaps this http://orlando.mvps.org/ExcelStopwatchMore.asp or Google for Excel Stopwatch.

 

[hrayani]

Dear Vog,

Pls let me know that is it possible to have a stopwatch through Vba

Like if we can create 3 command buttons. (1, START 2,STOP 3,RESET)
and then can assign some codes to that so we can have the stop watch on the sheet

Is is possible??? Can u help me with the codes?

Humayun

 

[VoG]

Try in a regular module

Dim NextTick As Date, t As Date

Sub StartClock()
t = Time
Call TickTock
End Sub

Private Sub TickTock()
Range("A1").Value = Format(Time - t, "hh:mm:ss")
NextTick = Now + TimeValue("00:00:01")
Application.OnTime NextTick, "TickTock"
End Sub

Sub StopClock()
Application.OnTime earliesttime:=NextTick, procedure:="TickTock", schedule:=False
End Sub

Sub Reset()
Call StopClock
Range("A1").Value = 0
End Sub

You can assign StartClock, StopClock and Reset to buttons from the Forms toolbar.

 

[hrayani]

Dear Vog,

I have pasted the codes in the regular module.. Now i have also created three button on the screen named START STOP and RESET..

Pls tell me what to do further ???

i am unable to proceed without your help

Humayun

 

[VoG]

Right click each button in turn and select Assign Macro and assign the appropriate sub. Then click the start button to start the stopwatch which is displayed in A1.

 

[hrayani]

Dear Vog,

Thanks very much for your help. One last question the time i am getting on the screen is for example 0:00:02 can we increase the second to mili seconds like 0:00:000002

Humayun