See Also
Returns the number of seconds that have elapsed since 12:00 AM (midnight).
Timer
The following example uses the Timer function to determine the time it takes to iterate a For...Next loop N times: Function TimeIt(N) Dim StartTime, EndTime StartTime = Timer For I = 1 To N Next EndTime = Timer TimeIt = EndTime - StartTime End Function
Function TimeIt(N) Dim StartTime, EndTime StartTime = Timer For I = 1 To N Next EndTime = Timer TimeIt = EndTime - StartTime End Function