Word VBAで処理を待機する方法：初心者でもできる簡単なマクロ活用術

こんにちは！今日は、Microsoft WordのVBA（Visual Basic for Applications）を使って、マクロの実行中に「待機時間」を挟む方法についてお話しします。パソコンを使い始めたばかりの方でも安心して学べる内容ですので、ぜひ最後までご覧ください。

Word VBAで「待機」を使いたい！でも、どうすればいいの？
Word VBAで「待機」を実現する方法
1. WindowsのSleep機能を使う方法
2. タイマーを使って待機する方法
実際の活用シーン
1. 例文書の読み込みから保存までの一連の処理に待機を挟む
よくある質問
今すぐ解決したい！どうしたらいい？
まとめ

Word VBAで「待機」を使いたい！でも、どうすればいいの？

Wordのイメージ

まず最初に、WordのVBAマクロで「待機」を使いたいと思ったことはありませんか？たとえば、複数の処理を順番に実行する際に、各処理の間に少し時間を置きたいときなどです。

しかし、Excelでは簡単に使える`Application.Wait`メソッドが、WordのVBAには存在しません。これが、初心者の方には少し戸惑うポイントかもしれません。

Word VBAで「待機」を実現する方法

では、WordのVBAで「待機」を実現するための方法をいくつかご紹介します。

WindowsのSleep機能を使う方法

Windowsには、処理を一定時間停止する「Sleep」機能があります。これをVBAに組み込むことで、指定した時間だけ処理を停止できます。

vba

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

Sub WaitForSeconds(ByVal Seconds As Long) Sleep Seconds * 1000 ' 秒をミリ秒に変換 End Sub

このコードを使うと、例えば`WaitForSeconds(3)`と記述することで、3秒間の待機が可能です。

タイマーを使って待機する方法

もう一つの方法は、VBAの`Timer`関数を使って待機する方法です。`Timer`関数は、コンピュータが起動してからの経過時間を秒単位で返します。

vba

Sub WaitForSeconds(ByVal Seconds As Long)

    Dim StartTime As Double

    StartTime = Timer

    Do While Timer < StartTime + Seconds
        DoEvents ' 他の処理をブロックしないようにする
    Loop
End Sub

この方法では、`WaitForSeconds(3)`と記述することで、3秒間の待機が可能です。

実際の活用シーン

では、これらの「待機」を実際のマクロでどのように活用できるか、具体的な例を見てみましょう。

例文書の読み込みから保存までの一連の処理に待機を挟む

vba

Sub ProcessDocument()

    ' 文書の読み込み

    Documents.Open "C:\path\to\your\document.docx"
    ' 2秒待機

    WaitForSeconds 2
    ' 書式変更

    Selection.Font.Size = 14

    Selection.Font.Name = "MS ゴシック"
    ' 2秒待機

    WaitForSeconds 2
    ' 文字の置換

    Selection.Find.Text = "旧文字列"

    Selection.Find.Replacement.Text = "新文字列"

    Selection.Find.Execute Replace:=wdReplaceAll
    ' 2秒待機

    WaitForSeconds 2