如何遍历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,就有了一切


你可能感兴趣的:(each)