Var1 = Now()
'Your Code
Range("A1") = Now() - Var1

Charles

Steve M wrote:
I have a VBA routine that may take a considerable amount of time to execute
(~20minutes). I would like to have the code time itself and record the value
in a workbook to allow other future users to know how long the routine is
likely to take. Has anyone done this? Any ideas on how to proceed?

Thanks,
Steve