EXCEL マクロの処理時間の出し方。

2018年7月31日

マクロを構築していると、処理時間に影響する事例が、度々出てきます。
そんな処理時間の表示する方法です。

'### timer ###
Dim TSTART As Single
Dim TEND As Single

TSTART = Timer

※処理

TEND = Timer

【最後にメッセージで何秒かかったかです】
MsgBox ("おわり。 かかった時間は" & TEND - TSTART & "秒です") 

【どこかのシートにも結果を保存しておきます】
Worksheets("START").Range("E10").Value = TEND - TSTART