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

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

vba ms-word

Vba 更改MS Word中某些文本的字体颜色,vba,ms-word,Vba,Ms Word,我几乎没有VBA经验，并且我有一个包含以下类似文本的大型文档： “（+12.3%）折合为（-7890万美元）” 类似于我想将符号“+”或“-”后面的文本分别更改为绿色和红色，同时保持文本为黑色 VBA代码是否可以自动执行此操作？您可以使用两个通配符查找/替换操作来执行此操作，而无需求助于宏，使用： Find = +[0-9.%$M]{1,} Replace = ^& 替换字体颜色设置为绿色，以及 Find = \-[0-9.%$M]{1,} Replace = ^& 替换字体

我几乎没有VBA经验，并且我有一个包含以下类似文本的大型文档：

“（+12.3%）折合为（-7890万美元）”

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

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

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

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

替换字体颜色设置为绿色，以及

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

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