Vannは、複数のセクションを使用するドキュメントを常に作成しています。これらのドキュメントにヘッダーまたはフッターを追加する場合、「前へのリンク」

設定は常にオンになっています。 Vanは、デフォルトで設定をオフにする方法があるかどうか疑問に思います。彼がそれを使用することはめったになく、常に変更するのは面倒です。彼がドキュメントを操作するときに確認する必要があるのは、もう1つだけです。

Word自体の中で[前へのリンク]設定のデフォルトを指定する方法はありません。ただし、ドキュメントに区切りを追加する方法は変更できます。マクロを介してこれを行う場合、マクロは、新しく追加されたセクションの[前へのリンク]設定を簡単にオフにすることができます。これを行う簡単な方法は次のとおりです：

Sub AddBreak()

Dim iSec As Integer

Selection.InsertBreak Type:=wdSectionBreakNextPage

iSec = Selection.Information(wdActiveEndSectionNumber)

With ActiveDocument.Sections(iSec)

.Headers(wdHeaderFooterPrimary).LinkToPrevious = False         .Headers(wdHeaderFooterEvenPages).LinkToPrevious = False         .Headers(wdHeaderFooterFirstPage).LinkToPrevious = False         .Footers(wdHeaderFooterPrimary).LinkToPrevious = False         .Footers(wdHeaderFooterEvenPages).LinkToPrevious = False         .Footers(wdHeaderFooterFirstPage).LinkToPrevious = False     End With End Sub
InsertBreakメソッドは、実際にブレークを挿入します。この場合、それは次の改ページです。 wdSectionBreakNextPage列挙をこれらの他のタイプのブレークの1つに変更するだけで、さまざまなタイプのブレークを指定できます。

wdSectionBreakContinuous wdSectionBreakEvenPage * wdSectionBreakOddPage

次に、マクロはiSecを現在のセクションのインデックス番号に等しく設定します。

次に、これをWith構造体で使用して、3つのタイプのヘッダーすべてと3つのタイプのフッターすべてにLinkToPreviousプロパティを設定します。

必要に応じて、ドキュメントのすべてのセクションのすべてのヘッダーとフッターのLinkToPreviousプロパティを一度に変更できます。

Sub ChangeAll()

Dim s As Section

For Each s In ActiveDocument.Sections         s.Headers(wdHeaderFooterEvenPages).LinkToPrevious = False         s.Headers(wdHeaderFooterFirstPage).LinkToPrevious = False         s.Headers(wdHeaderFooterPrimary).LinkToPrevious = False         s.Footers(wdHeaderFooterEvenPages).LinkToPrevious = False         s.Footers(wdHeaderFooterFirstPage).LinkToPrevious = False         s.Footers(wdHeaderFooterPrimary).LinkToPrevious = False     Next s End Sub

注：

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

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

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

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