VBAで指定時間だけ処理を止めるには
Windows APIのSleepを使います。
指定時間だけ処理を止めるSleepは
外部プログラムの応答を待つときなどに使用します。
1 2 3 4 5 6 7 |
Option Explicit Private Declare Sub Sleep Lib "kernel32" (ByVal ms As Long) Sub testSleep() Sleep 3000 End Sub |
モジュールの最初でDeclareステートメントを使用します。
こちらの宣言を行うことによって、Windows APIの
Sleep関数を使えるようになります。
Sleepのあとに処理を止めたい時間を指定します。
時間はミリ秒で指定します。
1秒の場合はSleep 1000
2秒の場合はSleep 2000です。
ミリ秒単位でSleepさせるのが直感的でなければ
関数を作成して秒単位でスリープさせましょう。
1 2 3 4 5 6 7 8 9 10 11 12 |
Option Explicit Private Declare Sub Sleep Lib "kernel32" (ByVal ms As Long) Sub sleepSecond(milSecond As Long) Sleep milSecond * 1000 End Sub Sub test_sleepSecond() call sleepSecond(3) End Sub |
コメント