Word VBA教程:HeaderFooter对象

   
多种对象
HeaderFooter
多种对象

该对象代表一个单独的页眉或页脚。HeaderFooter对象是HeaderFooters集合的一个成员。HeaderFooters集合包含指定文档的某一节中所有的页眉和页脚。

使用 HeaderFooter对象

使用 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

Word VBA教程

Word VBA参考教程:目录1 Word VBA参考教程:目录2
Word VBA参考教程:目录3 Word VBA参考教程:目录4
Word VBA参考教程:目录5 Word VBA参考教程:目录6
Word VBA参考教程:目录7 Word VBA参考教程:目录8
Word VBA参考教程:目录9 Word VBA参考教程:目录10
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号