Fakhruddinは、Wordの組み込みの見出しスタイルである見出し1から見出し3を使用して4つのドキュメントを作成しました。次に、4つのファイルを1つの非常に長いドキュメントに結合する必要があるため、各ファイルは章を表します。これにより、各ファイルの先頭に高レベルの見出しが必要になります。 Fakhruddinは、現在の見出しのレベルをすばやく変更して（すべてを1レベル下に移動し、見出し2から見出し4に）、結合を行うときに各ファイルの先頭に新しい見出し1の見出しを追加できるようにする方法を考えています。

実際には、このタスクを実行するために使用できる方法はたくさんあります。 （実際にはもっとあるかもしれませんが、私はそれらのうちの5つを特定しました。）しかし、私はこのヒントに焦点を当てたいと思います。

このタイプの方位調整を散発的に行う必要がある場合は、最初の方法が最適です。これは、Wordで見落とされがちなツールであるアウトラインビューを多くの人が考えているものを使用しています。次の手順に従ってください：

。リボンの[表示]タブを表示します。

。リボンの左端近くにある[アウトライン]をクリックします。ドキュメントの外観が異なり、リボンの[アウトライン]タブが表示されます。

。リボンの[アウトライン]タブで、[レベルの表示]ドロップダウンリストを使用して、ドキュメントで使用する見出しレベルの数より1つ大きい見出しレベルを選択します。 （したがって、3つの見出しレベルを使用するFakhruddinの場合、[レベルの表示]ドロップダウンを使用してレベル4を選択します。）この時点で、ドキュメントには見出しのみが表示されます。 （図1を参照）

。 Ctrl + Aを押します。ドキュメント全体を選択する必要があります。

。 Tabキーを押します。 （リボンの[アウトライン]タブの左側にある[降格]ツールを使用することもできます。右向きの矢印のように見えます。）すべての見出しが1つのレベルに降格され、Fakhruddinが望むことを正確に実行します。

。リボンの[アウトライン]タブの右側にある[アウトラインビューを閉じる]ツールをクリックするか、ステータスバーの[レイアウトの印刷]ツールをクリックします。

いずれにせよ、編集を続けることができるドキュメントに戻ることになります。

簡単ですよね？見出しの降格は、選択された見出しにのみ影響しますが、Ctrl + A（ステップ4）を使用したため、すべての見出しが影響を受けました。つまり、見出しのサブセットのみに影響を与える場合は、手順4でそれらの見出しを選択する必要があります。

私が強調したかった2番目のアプローチは、マクロを使用することです。アウトラインビューの使用がとても簡単なのに、なぜマクロを使用するのですか？タスクを頻繁に実行する必要がある場合、または見出しを複数回降格する必要がある場合に最も便利だと思います。これが私が思いついたマクロです：

Sub DemoteAllHeadings()

Dim p As Paragraph     Dim sParStyle As String     Dim iHeadLevel As Integer

For Each p In ActiveDocument.Paragraphs         sParStyle = p.Style         If Left(sParStyle, 7) = "Heading" Then             iHeadLevel = Val(Mid(sParStyle,8)) + 1             If iHeadLevel > 9 Then iHeadLevel = 9             p.Style = "Heading " & iHeadLevel         End If     Next p End Sub

ドキュメントの長さに関係なく、マクロは非常に高速に実行されます。

すべての段落をステップスルーし、それが見出しレベルであるかどうかを確認し、そうである場合は、段落に適用される見出しスタイルをインクリメントします。 Wordには9つの見出しスタイルレベルしか組み込まれていないため、見出し9スタイルを超えて増加するのを防ぐセーフガードが組み込まれています。

注：

このページ（または_WordTips_サイトの他のページ）で説明されているマクロの使用方法を知りたい場合は、役立つ情報を含む特別なページを用意しました。

link：/ wordribbon-WordTipsMacros [ここをクリックして、新しいブラウザタブでその特別なページを開きます]。

_WordTips_は、費用効果の高いMicrosoftWordトレーニングのソースです。

（Microsoft Wordは、世界で最も人気のあるワードプロセッシングソフトウェアです。）このヒント（13732）は、Microsoft Word 2007、2010、2013、2016、2019、およびOffice365のWordに適用されます。