Application.OnTime EarliestTime:=(Now + TimeValue("00:00:02")), _ Procedure:="Macro1", _ LatestTime:=(Now + TimeValue("00:01:00"))
※現在時刻の2秒後にMacro1を実行する。他のマクロが実行している場合は実行できないので、1分間は様子を見る。
Application.OnTime EarliestTime:=(Now + TimeValue("00:00:02")), _ Procedure:="Macro1", _ LatestTime:=(Now + TimeValue("00:01:00"))
※現在時刻の2秒後にMacro1を実行する。他のマクロが実行している場合は実行できないので、1分間は様子を見る。