timer

[mike allen]

odd question: is there code that will start a "stopwatch" (in seconds) upon
activating one sub then stop and display the time elapsed between activating
the first sub a second sub on the second sub?

 

[Gord Dibben]

Mike

Example of using a Tmer

Sub dostuff()
StartTime = Timer
For Each cell In Range("A1:AA1000")
cell.Value = "qwertyuiop"
Next
MsgBox Timer - StartTime
End Sub

Stick the StartTime = Timer line wherever you want to start timing in your Sub

MsgBox line when done.


Gord Dibben MS Excel MVP

 

[Tom Ogilvy]

Just to supplement Gordon's response.

Timer has about 1 second resolution which isn't very good for timing code
unless you do a lot of repetitions within the timing loop.

Here is an article showing how to use more precise procedures:
..
How To Use QueryPerformanceCounter to Time Code
http://support.microsoft.com/kb/172338/en-us

 

[Gord Dibben]

Good stuff Tom

Thanks, Gord