Word 文書内で同じ単語のすべてのインスタンスを太字にするには、どうすればよいですか？

著者Xiaoyang変更日2025-03-31

長いWord 文書全体で繰り返される単語を手動で太字にすると、時間と労力がかかり、非効率です。1 つの単語だけでなく、複数の異なる単語を一度に太字にしたい場合でも、このチュートリアルでは2 つの効果的な方法をご紹介します。すなわち、1 つの単語にはシンプルな VBA スクリプトを使用する方法、または複数の単語にはKutools for Word の強力な一括置換ツールを利用する方法です。

VBA コードでWord 文書内の同じ単語のすべてのインスタンスを太字にする

Kutools for Word でWord 文書内の複数の単語のすべてのインスタンスを太字にする

VBA コードでWord 文書内の同じ単語のすべてのインスタンスを太字にする

次の VBA コードを使えば、ドキュメント全体にある特定の単語をすべて太字にできます。以下の手順に従ってください：

Microsoft Visual Basic for Applications ウィンドウを開くには、Alt + F11を押してください。

［挿入］>［モジュール］をクリックし、次のコードを空白のモジュールにコピー＆ペーストします：

Sub BoldAll()
    Dim xStr As String
    xStr = InputBox("Please enter the word that you want to bold:", "Kutools for Word")
    If Trim(xStr) = "" Then
        MsgBox "Can't be empty!", vbInformation, "Kutools for Word"
        Exit Sub
    End If
    With ActiveDocument.Content.Find
        .ClearFormatting
        .Text = xStr
        .Replacement.ClearFormatting
        .Replacement.Font.Bold = True
        .Replacement.Text = "^&"
        .Wrap = wdFindStop
        .Format = True
        .Forward = True
        .Execute Replace:=wdReplaceAll
    End With
End Sub

コードを挿入した後、F5を押して実行すると、太字にしたい単語を入力するよう求めるダイアログボックスが表示されます。
［OK］をクリックすると、ドキュメント内で指定された単語のすべてのインスタンスが太字に書式設定されます。

Kutools for Word でWord 文書内の複数の単語のすべてのインスタンスを太字にする

VBA を使う代わりに、Kutools for Word の「一括置換」機能を使えば、複数の単語を一度に簡単に太字にできます。この方法は、コードを一切記述せずに、特定の複数の単語にまとめて太字書式を適用したい場合に最適です。

［Kutools］＞「一括置換」をクリックします。
一括検索と置換ウィンドウで、「行を追加」ボタンをクリックして検索と置換のルールを追加します：
1. 「検索する文字列」ボックスと「置換後の文字列」ボックスの両方に、太字にしたい単語を入力してください。
2. 「フォーマットを検索」列で［フォント］をクリックし、元の書式（通常は「標準」に設定されています）を指定してください。
3. 「フォーマットを置換」列で［フォント］をクリックし、「太字」を選択してください。
上記の手順を繰り返して太字にしたい他の単語を追加するには、「行を追加」を再度クリックしてください。
すべての単語を追加し終えたら、「置換」をクリックして、指定したすべての単語を一括で太字にしましょう。