Timer 関数
午前 0:00 以降に経過した秒数を返します。
Timer
解説
次の例では、For...Next ループを N 回繰り返すために必要な時間を、Timer 関数を使って決める例です。
Function TimeIt(N)
Dim StartTime, EndTime
StartTime = Timer
For I = 1 To N
Next
EndTime = Timer
TimeIt = EndTime - StartTime
End Function