VBAサンプル
================================================
=== 開始!!=======================================
================================================
Sub タイマー設定()
'@ 5秒後に、「test」を実行する。
Application.OnTime Now + TimeValue("00:00:05"), "test"
'A 指定時間に、「test」を実行する。
MsgBox ("18:44秒後に動く ")
Application.OnTime TimeValue("18:44:00"), "test"
End Sub
Sub test()
MsgBox ("タイマー起動")
End Sub
================================================
=== 終了!!=======================================
================================================