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


發表評論
所有評論
還沒有人評論,想成為第一個評論的人麼? 請在上方評論欄輸入並且點擊發布.
相關文章