Timer for Sub Proc

[nickytraps]

Hi all,

Hopefully this is an easy one. I have a main sub that runs and calls a second sub. Can I start a timer at the first sub and have it end/display when the second/called sub completes? If so can you please post a sample code? Thank you.

[¯\_(ツ)_/¯]

Have you tried Googling for "VBA Timer"? Pretty simple function to use, see here: https://www.thespreadsheetguru.com/t...macro-run-time

[nickytraps]

Have you tried Googling for "VBA Timer"? Pretty simple function to use, see here: https://www.thespreadsheetguru.com/t...macro-run-time

That is actually where I pulled the code for the timer in the first sub. What I'm trying to do is start the timer when the first sub kicks off, and then carry it through to the end of the second sub which is called by the first sub.

[¯\_(ツ)_/¯]

So you'd place the "StartTime = Timer" at the beginning of your first sub, then the "SecondsElapsed" code immediately after the call to the second sub (assuming the first sub does additional tasks after the second sub ends).

If that's not the case, you could probably use global public variables instead (stored in a standard module) and just set the start time at the start of sub1, and then just before exiting sub2, set an end time variable (or do the math to get the current time and subtract the original global variable).

[nickytraps]

No once the second sub ends that is it. So it is basically as follows:


Sub 1 (variables and start timer)

code here

Call Sub2
End Sub1
_________
Sub2

code here

End Sub2

[¯\_(ツ)_/¯]

Technically it doesn't matter that nothing else is executed in the second sub. Once the called sub (Sub2) completes, focus goes back to Sub1 to complete - in this case simply ending. You would still have the calculation done at the end of Sub1. See example below:

Please Login or Register  to view this content.

[Norie]

Try this.

1 Create a new Class module and call it CTimer

2 Paste this code in the CTimer module.

Please Login or Register  to view this content.

3 To time your Sub2 try this.

Please Login or Register  to view this content.

[nickytraps]

Thanks all. I actually went with a version of the code posted by ¯\_(ツ)_/¯. Much appreciated.

Please Login or Register  to view this content.