如何用vba按照格式查找替换word文本?

如何用vba实现word的查找替换?一文中我们介绍了用vba实现word的文本的查找替换。

在word中除了文本的查找替换以外,还会遇到格式的查找替换。

我们需要通过格式查找具体的字符,并对查找到的字符执行相应的操作,如批量替换为其它格式,或者批量替换为其它字符等。

比如查找某种字体颜色的文本,然后替换为另一种字体颜色的文本,亦或是查找某种背景色的文本,替换为另一种背景色的文本等。

要在vba中实现按照格式查找替换word文本,可以使用Find对象先设置要查找的格式,再用Replacement对象设置要替换的格式,最后通过Execute方法执行查找替换时,将要查找的文本和要替换的文本都设置为空。

以下代码演示了如何将某种颜色字体的文本替换为无颜色的字体的文本。

以下代码演示了如何将粗体的字符批量添加上括号:

 

 

       

发表评论