VBA 10秒後にマクロを実行する

 

10秒後にマクロを実行する

 

Sub test()
    ’ 10秒後指定マクロを実行する
    Application.OnTime Now + TimeValue("00:00:10"), "Greeting"

End Sub

Sub Greeting()
　　’　挨拶のマクロ（実行対象マクロ）
    MsgBox "Wellcom to Yokbali168"
End Sub

 

実行結果

 

ApplicationオブジェクトのOnTimeメソッドで、指定時間後にマクロを実行するすることができます。

「Now + TimeValue("00:00:10")」は、実行開始時刻を指定します。現在時刻NowにTimeValueで10秒をたすことで、10秒後の実行時刻をしてします。

そのあと「"Greeting"」、実行してもらいたいマクロの名前を入れればいいです。

 

 

― ― ― ― ― ― ― ― ― ― → Excel VBA基礎入門もくじ へ戻る 

 

参考記事

 

 

 

yokbali168のmy Pick