HeaderFooter.LinkToPrevious 屬性 (Word)

如果指定的頁首或頁尾會連結至上一節的對應頁首或頁尾，則為 True。 可讀寫的 Boolean。

語法

expression。 LinkToPrevious

表達 會傳回 'HeaderFooter' 物件的運算式。

註解

連結頁首或頁尾時，其內容會與上一個頁首或頁尾相同。 因為 LinkToPrevious 屬性預設為 True，所以您可以使用第一節中的頁首、頁尾及頁碼，將頁首、頁尾及頁碼新增至整份文件。 例如，下列範例會將頁碼新增至使用中文件所有章節內所有頁面的頁首。

ActiveDocument.Sections(1) _ 
 .Headers(wdHeaderFooterPrimary).PageNumbers.Add

LinkToPrevious 屬性會個別套用至每個頁首或頁尾。 例如，LinkToPrevious 屬性可以將偶數頁的頁首設為 True，而將偶數頁的頁尾設為 False。

範例

本範例的第一個部分會建立包含兩個章節的新文件。 第二個部分則會為新文件的第 1 及 2 節的偶數頁及奇數頁建立唯一的頁首。

Documents.Add 
With Selection 
 For j = 1 to 4 
 .TypeParagraph 
 .InsertBreak 
 .TypeParagraph 
 Next j 
End With 
With ActiveDocument 
 .Paragraphs(5).Range.InsertBreak Type:=wdSectionBreakNextPage 
 .PageSetup.OddAndEvenPagesHeaderFooter = True 
End With 
With ActiveDocument.Sections(2) 
 With .Headers(wdHeaderFooterPrimary) 
 .LinkToPrevious = False 
 .Range.InsertBefore "Section 2 Odd Header" 
 End With 
 With .Headers(wdHeaderFooterEvenPages) 
 .LinkToPrevious = False 
 .Range.InsertBefore "Section 2 Even Header" 
 End With 
End With 
With ActiveDocument.Sections(1) 
 .Headers(wdHeaderFooterPrimary) _ 
 .Range.InsertBefore "Section 1 Odd Header" 
 .Headers(wdHeaderFooterEvenPages) _ 
 .Range.InsertBefore "Section 1 Even Header" 
End With

另請參閱

HeaderFooter 物件

支援和意見反應

有關於 Office VBA 或這份文件的問題或意見反應嗎？ 如需取得支援服務並提供意見反應的相關指導，請參閱 Office VBA 支援與意見反應。