如何遍历Word的页眉和页脚的域

最新推荐文章于 2024-01-14 18:16:37 发布

原创最新推荐文章于 2024-01-14 18:16:37 发布 · 2.7k 阅读

0 ·

CC 4.0 BY-SA版权

文章标签：

#each

Office 专栏收录该内容

7 篇文章

订阅专栏

本文介绍了一段用于操作Word文档中页眉页脚的VBA代码示例，展示了如何遍历文档各节并获取不同类型的页眉页脚内容。通过实际案例解释了页眉页脚与正文的关系及Word中页眉页脚的设置方式。

'关键代码如下

Sub 宏1()

     For Each sec In ActiveDocument.Sections
        MsgBox (sec.Headers(wdHeaderFooterFirstPage).Range.Text)
        MsgBox (sec.Headers(wdHeaderFooterPrimary).Range.Text)
        MsgBox (sec.Headers(wdHeaderFooterEvenPages).Range.Text)
        
        MsgBox (sec.Footers(wdHeaderFooterFirstPage).Range.Text)
        MsgBox (sec.Footers(wdHeaderFooterPrimary).Range.Text)
        MsgBox (sec.Footers(wdHeaderFooterEvenPages).Range.Text)
    Next
    
End Sub

1.页眉页脚和正文是分开的

2.页眉页脚分三种，首页、奇数、偶数

3.word中每节都可以单独设置

4.同一节中，某些页眉页脚实际上引用的同一个，只是显示多个而已

5.有了range，就有了一切