共用方式為


HeaderFooter.Index 屬性 (Word)

會傳回代表指定的頁首或頁尾中的文件或章節 WdHeaderFooterIndex 。 唯讀。

語法

運算式指數

需要 expression。 代表 'HeaderFooter' 物件的變數。

範例

如果指定的變數參照第一頁頁首,本範例會將圖案新增至使用中文件的第一頁頁首。

Sub ChangeFirstPageFooter() 
 Dim hdrFirstPage As HeaderFooter 
 
 Set hdrFirstPage = ActiveDocument.Sections(1).Headers(wdHeaderFooterFirstPage) 
 
 If hdrFirstPage.Index = wdHeaderFooterFirstPage Then 
 With hdrFirstPage.Shapes.AddShape(Type:=msoShapeHeart, _ 
 Left:=36, Top:=36, Width:=36, Height:=36) 
 .Fill.ForeColor.RGB = RGB(Red:=255, Green:=0, Blue:=0) 
 End With 
 End If 
 
End Sub

另請參閱

HeaderFooter 物件

支援和意見反應

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