Word VBAで文字列を検索する方法【初心者向け解決ガイド】

2025.03.06

こんにちは、皆さん。今日は、WordのVBAを使って文字列を検索する方法についてお話しします。パソコンやスマホが苦手な方でも大丈夫ですよ。一緒に学んでいきましょう。

VBAとは何か？
Wordでの文字列検索の基本
1. Findオブジェクトの活用
実際にマクロを作ってみましょう
よくある質問や疑問
1. Q1: マクロを実行しても何も起こりません。どうすればいいですか？
2. Q2: 特定のフォルダ内の複数のWordファイルを一度に検索できますか？
今すぐ解決したい！どうしたらいい？
まとめ

VBAとは何か？

Wordのイメージ

まず、VBAについて簡単に説明します。VBAは「Visual Basic for Applications」の略で、WordやExcelなどのMicrosoft Office製品を自動化するためのプログラミング言語です。難しそうに聞こえるかもしれませんが、基本を押さえれば便利に使えます。

Wordでの文字列検索の基本

Wordで特定の文字列を探すとき、通常は「Ctrl」キーと「F」キーを同時に押して検索しますよね。これをVBAで自動化すると、もっと効率的に作業ができます。

Findオブジェクトの活用

VBAで文字列を検索する際には、Findオブジェクトを使用します。これは、Wordの「検索と置換」機能をプログラムで操作するためのものです。具体的には、以下のように使います。

vba

With Selection.Find

    .Text = "検索したい文字列"

    .Execute

End With

このコードは、現在のカーソル位置から「検索したい文字列」を探すという意味です。

実際にマクロを作ってみましょう

それでは、実際にマクロを作成してみましょう。以下の手順で進めます。

Wordを開き、「Alt」キーと「F11」キーを同時に押してVBAエディタを起動します。
「挿入」メニューから「標準モジュール」を選択します。
以下のコードを入力します。

vba

Sub 文字列を検索する()

    Dim 検索文字列 As String

    検索文字列 = InputBox("検索したい文字列を入力してください")
    With Selection.Find

        .Text = 検索文字列

        .Forward = True

        .Wrap = wdFindStop

        .Execute

    End With

If Selection.Find.Found Then MsgBox "見つかりました！" Else MsgBox "見つかりませんでした。" End If End Sub

このマクロを実行すると、入力ボックスが表示され、検索したい文字列を入力できます。その文字列が見つかれば「見つかりました！」と表示され、見つからなければ「見つかりませんでした。」と表示されます。