Question

VBA怎么修改word页脚下的文字

请问怎么修改word页脚下的文字 用VBA有没有大侠做到过的

Answer 1

录制宏。所谓的宏就是批处理脚本。其实也是一段VB代码

Answer 2

为什么在常规的替换方法可以替换页码，但是用VB代码就是不行

Answer 3

你可以这样做把WORD另存为XML然后用VB脚本去操作这个XML

Answer 4

是页脚里面的文字？

Answer 5

Sub 在页脚插入普通页码()
ActiveDocument.PageSetup.OddAndEvenPagesHeaderFooter = False '关闭奇偶页相同(防止上回启用奇偶页不同后没有关闭此项设置)
With ActiveWindow.ActivePane.View
.SeekView = wdSeekCurrentPageFooter
With Selection
.Expand wdStory
.Font.Size = 14 '字号
.Font.name = "宋体" '字体
.ParagraphFormat.Alignment = wdAlignParagraphCenter
.TypeText "-"
.Fields.Add .Range, wdFieldPage
.TypeText "-"
.ParagraphFormat.Alignment = wdAlignParagraphRight '页码的位置居右
End With
.SeekView = wdSeekMainDocument '退出页码的编辑(即关闭页眉和页脚工具栏)
End With
End Sub