多种对象![]() ![]() ![]() |
该对象代表一个单独的页眉或页脚。HeaderFooter 对象是 HeaderFooters 集合的一个成员。HeaderFooters 集合包含指定文档的某一节中所有的页眉和页脚。
使用 Headers(index) 或 Footers(index) 可返回单独的 HeaderFooter 对象,其中 index 为 WdHeaderFooterIndex 常量之一(wdHeaderFooterEvenPages、wdHeaderFooterFirstPage 或 wdHeaderFooterPrimary)。下列示例更改活动文档第一节中主页眉和主页脚的文字。
With ActiveDocument.Sections(1)
.Headers(wdHeaderFooterPrimary).Range.Text = "Header text"
.Footers(wdHeaderFooterPrimary).Range.Text = "Footer text"
End With
也可使用 Selection 对象的 HeaderFooter 属性返回单独的 HeaderFooter 对象。
注意 不能将 HeaderFooter 对象添至 HeadersFooters 集合。
使用 PageSetup 对象的 DifferentFirstPageHeaderFooter 属性可指定不同的首页。下列示例在活动文档首页的页脚中插入文字。
With ActiveDocument
.PageSetup.DifferentFirstPageHeaderFooter = True
.Sections(1).Footers(wdHeaderFooterFirstPage) _
.Range.InsertBefore _
"Written by Joe Smith"
End With
使用 PageSetup 对象的 OddAndEvenPagesHeaderFooter 属性可为奇数页和偶数页设置不同的页眉和页脚。如果 OddAndEvenPagesHeaderFooter 属性值为 True,则使用 wdHeaderFooterPrimary 可返回奇数页的页眉或页脚,使用 wdHeaderFooterEvenPages 可返回偶数页的页眉或页脚。
使用 PageNumbers 对象的 Add 方法可在页眉或页脚中添加页码。下列示例在活动文档第一节的主页脚中添加页码。
With ActiveDocument.Sections(1)
.Footers(wdHeaderFooterPrimary).PageNumbers.Add
End With