Question

word vba问题 如何批量替换文件夹内所有的WORD文档内相同的词组？

word vba问题 怎么批量的将WORD文档中某一词组替换，比如说每一个WORD文档都有“XX公司”，想把这个“XX公司”替换为“XX集团”，当然要是能支持打开EXCEL，并替换是最好的。要是不行，替换WORD的也可以。求各位达人帮帮忙、、。

Answer 1

selection.moveup
unit:=wdline,
count:=1
selection.moveright
unit:=wdcharacter,
count:=10,
extend:=wdextend
selection.font.underlinecolor
=
wdcolorautomatic
selection.font.underline
=
wdunderlinesingle
'前面是选择，最后2句是设置下划线。