更改MS Word中某些文本的字体颜色

时间:2019-02-19 20:01:49

标签: vba ms-word

我对VBA的经验很少,并且有一个大型文档,其中包含类似于以下内容的文字:

  

“(+ 12.3%)转换为(-$ 7,890万)”

类似于this question的种类,我想将符号“ +”或“-”后面的文本分别更改为绿色和红色,同时保持黑色。

VBA代码是否可以自动执行此操作?

1 个答案:

答案 0 :(得分:0)

您可以使用两个通配符查找/替换操作来执行此操作,而无需求助于宏,可以使用:

Find = +[0-9.%$M]{1,}
Replace = ^&

,替换字体颜色设置为绿色,并且

Find = \-[0-9.%$M]{1,}
Replace = ^&

,替换字体颜色设置为红色。当然,您可以使用宏记录器创建包含两个操作的单个宏。