Counting how long a Macro takes to run

[Guest]

I have a Macro that Opens, saves & closes a directory of files (to
automatically update data links, etc). I would like to add a little piece of
code that takes note of the time the Marco Starts & Stops & displays the time
it took to run when it is completed.

I currently have code that displays the quantity of files updated.

MsgBox "Update Complete. " & Counter & " Files Updated"

I was wondering if it was possible to perhaps capture the before & after
times & just subtract them (but I know dates/times in Excel are weird so I'm
not sure how to do it)

Thank you.
Regards,
Diane

 

[Tom Ogilvy]

dim sngStart as Single

sngStart = Now
- your code

MsgBox "Update Complete. " & Counter & _
" Files Updated" & VBNewline &
" took " & format(now - sngStart,"hh:mm:ss")

 

[Guest]

As always - fantastic! Thanks.

dim sngStart as Single

sngStart = Now
- your code

MsgBox "Update Complete. " & Counter & _
" Files Updated" & VBNewline &
" took " & format(now - sngStart,"hh:mm:ss")