一段关于Word 文档处理的很有用的程序

VBA让工作效率飞起来！

专门代写EXCEL VBA中小型 程序代码。

本人以诚信立足 ，另欢迎加友交流学习！

Sub 遍历每一个字符()

Dim EveryChar As Variant '每个字符
Dim P As Paragraph '段落
For Each P In ActiveDocument.Paragraphs
For Each EveryChar In P.Range.Characters
EveryChar.Select
'要处理的语句
Next EveryChar
Next P
End Sub