Word 文書内の「見出し1」をすべて一度に「見出し2」に変更するには、どうすればよいですか？

タイトル、サブタイトル、見出し1、見出し2 など、さまざまなスタイルを含むWord 文書を扱う際には、明確性と一貫性を確保するため、文書の構造を見直して再編成したくなることがあります。たとえば、ある文書では特定のセクションに「見出し1」スタイルが使われているものの、構成を再検討した結果、それらのセクション見出しには本来「見出し2」スタイルを適用すべきだと気づくケースがあります。こうした見出しを一つひとつ手動で変更するのは、特に数十〜数百もの見出しが含まれる長大な文書では非常に手間がかかります。本記事では、Word で「見出し1」スタイルが適用されたすべての箇所を一度に「見出し2」スタイルへ効率的に切り替えるための、いくつかの実用的な方法をご紹介します。

見出し1 のすべてのインスタンスを一度に見出し2 に変更する

VBA コード - 文書全体で見出し1 を一括で見出し2 に変換

---

見出し1 のすべてのインスタンスを一度に見出し2 に変更する

次の方法では、Word に内蔵されたスタイルウィンドウを使って、見出し1 のすべてのインスタンスを一括で見出し2 に変更します。この方法は、視覚的な操作でその場で変更内容を確認したい方に最適です。

1。文書内で「見出し 1」スタイルが適用された任意の段落にカーソルを置き、そのスタイルをアクティブにしてから、ホームタブのスタイルグループにあるダイアログボックス起動ツールをクリックします。すると、文書で現在使用されているすべてのスタイルの一覧が表示されるスタイルウィンドウが開きます。

2。右側に表示されるスタイルウィンドウで、見出し 1スタイルを見つけます。見出し 1を右クリックし、表示されるメニューからすべて選択を選択すると、文書全体のすべての「見出し 1」段落が自動的に選択されます。特に大きなファイルでは、個別に検索・選択する手間を大幅に省けます！

3。これで見出し1 のテキストがすべて選択された状態になりますので、見出し2をスタイルウィンドウ内でクリックするだけです。選択されたすべての見出しが即座に「見出し1」から「見出し2」に一括でスタイル変更されます。この操作は、時間の節約だけでなく、文書全体の書式を均一に保つ効果も抜群です！

ヒントと注意点：変換対象のテキストが、作業を始める前に正しく「見出し 1」スタイルで書式設定されていることを確認してください。たとえば、手動で太字かつ大きなフォントに設定されているだけでは、「見出し 1」スタイルが適用されていないため、変換の対象外となります。多くの見出しが手動で書式設定されている場合は、スムーズな変換を確保するため、事前に「見出し 1」スタイルを適用することをおすすめします。また、変換後には意図したテキストのみが変更されたことを必ずご確認ください。誤って意図しないテキストが変換されてしまった場合は、「元に戻す」機能（Ctrl + Z）で変更をキャンセルし、調整のうえ再度操作してください。

この方法は操作が簡単で、高度な技術スキルを必要としないため、中規模の文書を管理する一般ユーザーに最適です。

---

VBA コード - 文書全体で見出し1 を一括で見出し2 に変換

大規模または非常に複雑な文書を扱うなど、より高度なシナリオでは、VBA マクロを使えば、見出し1 スタイルの段落をすべて一括で見出し2 に変更できます。この方法は、同じ作業を繰り返し行う必要がある場合や、複数の文書を素早く処理したいときに特に効果的です。

適用可能なシナリオ：文書に多数の見出しレベルが含まれている場合、文書が長すぎて手動での編集が面倒な場合、または複数の「見出し 1」セクションが文書全体に散在しており、漏れなくすべてを対象にしたい場合に、この方法をご検討ください。VBA を使えば、変換を素早くプログラム的に実行でき、人的ミスのリスクを軽減できます。

制限事項：VBA をご利用になるには、Word でマクロのセキュリティ設定を有効にしていただく必要があります。また、スクリプトに不慣れな方にとっては、マクロを直接編集するのは適していない可能性があります。マクロを実行する前に、必ず文書のバックアップを取得し、誤った操作によるデータ損失を防いでください。

1。Word 文書を開きます。マクロを実行する前にテキストを選択する必要はなく、文書全体が自動的に処理されます。

2。Alt+F11キーを押して、Microsoft Visual Basic for Applicationsウィンドウを開きます。VBA ウィンドウで、挿入 > 標準モジュールをクリックして新しいモジュールを作成し、次の VBA コードをモジュールにコピー＆ペーストしてください。

VBA コード：文書内のすべての見出し1 段落を見出し2 に変更

Sub ChangeHeading1toHeading2()
    Dim para As Paragraph
    Dim countChanged As Long
    Dim xTitleId As String
    On Error Resume Next

    xTitleId = "Kutools for Word"
    countChanged = 0

    For Each para In ActiveDocument.Paragraphs
        ' Built-in style names include a space: "Heading 1"
        If para.Style = ActiveDocument.Styles("Heading 1") Then
            para.Style = ActiveDocument.Styles("Heading 2")
            countChanged = countChanged + 1
        End If
    Next para

    MsgBox countChanged & " Heading 1 paragraphs changed to Heading 2.", _
           vbInformation, xTitleId
End Sub

3。VBA エディターを閉じて、Word ウィンドウに戻ります。Alt+F8を押してマクロ一覧を開き、ChangeHeading1toHeading2を選択して実行をクリックすると、マクロが文書全体を自動的に検索し、見出し1 スタイルが適用されたすべての段落を見出し2 に更新します。処理が完了すると、変更された見出しの総数を示すダイアログが表示されます。

ヒント：操作を元に戻せるよう、マクロを実行する前に必ず文書を保存してください。「見出し1」スタイルが正確に適用された段落のみが変更の対象となる点にご注意ください。カスタム名や変更済みのスタイルには影響しません。スタイル名をカスタマイズしている場合は、それに応じてコードを更新してください。エラーが発生したり、変更が反映されない場合は、見出しが正しくスタイル設定されているかご確認ください。結果が期待通りでない場合は、Ctrl + Z でマクロの実行をすぐに元に戻せます。

この VBA を活用した方法は、大規模な書式設定タスクや繰り返し作業に非常に効果的で、実用性に優れています。

---