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

最新推荐文章于 2021-04-16 09:43:05 发布

超级管理员9527

最新推荐文章于 2021-04-16 09:43:05 发布

阅读量2.6k

点赞数

分类专栏： Office 文章标签： each

本文链接：https://blog.csdn.net/crybird/article/details/7916071

版权

Office 专栏收录该内容

7 篇文章 0 订阅

订阅专栏

'关键代码如下

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，就有了一切