Dim strt as Single
strt = Timer

.. . .

msgbox "took " & Timer - strt & " seconds"

--
Regards,
Tom Ogilvy

"Todd Huttenstine" wrote in message
...
hey guys

I have a code that takes about 1 minute 40 seconds to
run. Is there anyway to time how long this operation
takes? At the very end of my code I want to put a message
box stating how long it took the code from start until the
point I want the message to appear.


Thanks

Todd Huttenstine