如何用vba判断word文档中是否有高亮(颜色)的文字?

在word中可以通过“开始”选项卡下的“字体”工作组中的“文本突出显示颜色”命令给文档中的文本添加高亮显示的背景填充色,如下图所示:

在word vba中,可以使用Range对象的HighlightColorIndex属性获取或者设置高亮的背景填充色。

如果要判断一个word文档是否有高亮的文字,需要逐字符遍历word文档,看是否HighlightColorIndex属性是大于0。

根据以上的分析,可以使用如下的代码实现:

 





       

发表评论