Word VBAでの処理待機方法：Sleep関数とWaitメソッドの使い方

皆さん、こんにちは。今回は、WordのVBAマクロを作成する際に、処理を一時停止させる方法についてお話しします。例えば、「特定の処理を行った後、数秒間待ってから次の処理を開始したい」といったケースです。そんな時に役立つのが、Sleep関数とWaitメソッドです。これらを上手に使いこなすことで、マクロの動作をより柔軟に制御できます。

Sleep関数とは？
1. Sleep関数の使い方
Waitメソッドとは？
1. Waitメソッドの代替方法
よくある質問や疑問
1. Q1: Sleep関数とWaitメソッドの違いは何ですか？
2. Q2: Sleep関数を使用する際の注意点はありますか？
今すぐ解決したい！どうしたらいい？
まとめ

Sleep関数とは？

Wordのイメージ

まず、Sleep関数についてご紹介します。これは、Windows APIの一部で、指定した時間だけプログラムの実行を中断することができます。時間はミリ秒（1秒の1000分の1）単位で指定します。例えば、5秒間中断させたい場合は、5000ミリ秒と指定します。

Sleep関数の使い方

VBAでSleep関数を使用するには、まずWindowsの「kernel32.dll」というライブラリからこの関数を呼び出す宣言を行う必要があります。以下のコードをモジュールの先頭に追加してください。

vba

#If VBA7 Then

    ' 64ビット版のExcelの場合

    Public Declare PtrSafe Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As LongPtr)

#Else

    ' 32ビット版のExcelの場合

    Public Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)

#End If

この宣言を行った後、以下のようにSleep関数を使用して処理を一時停止させることができます。

vba

Sub SampleMacro()

    ' 処理開始

    MsgBox "処理を開始します。"
    ' 5秒間待機

    Sleep 5000

' 処理再開 MsgBox "5秒経過しました。処理を再開します。" End Sub

このマクロを実行すると、最初のメッセージボックスが表示された後、5秒間の待機を経て、次のメッセージボックスが表示されます。

Waitメソッドとは？

次に、Waitメソッドについてです。こちらは、VBAのApplicationオブジェクトに用意されているメソッドで、指定した時刻まで処理を中断することができます。ただし、WaitメソッドはExcelの機能であり、Wordでは直接使用することができません。そのため、Wordで同様の機能を実現するには、他の方法を検討する必要があります。

Waitメソッドの代替方法

Wordで処理を一時停止させる一般的な方法として、以下のようなループを使用する方法があります。

vba

Sub Wait(seconds As Single)

    Dim endTime As Single

    endTime = Timer + seconds

    Do While Timer < endTime
        DoEvents ' 他のイベントを処理
    Loop
End Sub

このWaitプロシージャを使用して、特定の秒数だけ処理を待機させることができます。例えば、3秒待機させたい場合は、`Wait 3`と呼び出します。

よくある質問や疑問

Q1: Sleep関数とWaitメソッドの違いは何ですか？

A1: Sleep関数はWindows APIの機能で、指定した時間だけ処理を中断します。一方、WaitメソッドはVBAのApplicationオブジェクトに用意されているメソッドで、指定した時刻まで処理を中断します。ただし、WaitメソッドはExcelでのみ使用可能で、Wordでは直接使用できません。