Time consumption in macros

[Guest]

Hi eveybody, here I am with one question:

How can I know the time which takes to Excel to execute a macro. Because I
have got some loops and I want to know how long does it take in order to view
if I can improve the loops or not.

Probably it is a simple question which I don't know and I think it is very
useful.

Thanks for your time!!!

 

[colofnature]

At the start of your code put in the line:

start_time = Now


and at the end put:

msgbox "Seconds elapsed: " & int((now-start_time)*86400)


Col

 

[Guest]

Jon,

Here's a quick one.

Sub YourSubName()
Dim starttime As Double
starttime = Now
....your code....
MsgBox (Format(Now - starttime, "h:mm:ss"))
End Sub


Mike

 

[Guest]

You want to use the timer something like this...

Dim lng As Long
Dim sngStartTime As Single
Dim sngEndTime As Single

sngStartTime = Timer
For lng = 1 To 1000000000 Step 1
Next lng
sngEndTime = Timer
MsgBox "Duration " & sngEndTime - sngStartTime

 

[Bob Phillips]

As an example, rough and ready but should suit

Dim i As Long, j As Long
Dim nTime As Double

nTime = Timer
For i = 1 To 10000
For j = 1 To 10000
'
Next j
Next i

MsgBox Timer - nTime

--
HTH

Bob Phillips

(replace somewhere in email address with gmail if mailing direct)

 

[Guest]

Really thanks to all of you. It has been very useful.