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
另請參閱
支援和意見反應
有關於 Office VBA 或這份文件的問題或意見反應嗎? 如需取得支援服務並提供意見反應的相關指導,請參閱 Office VBA 支援與意見反應。