【发布时间】:2014-09-02 06:26:52
【问题描述】:
我正在尝试利用 Excel 中创建的数据生成 .docx 报告。宏从 excel 运行,打开一个 word 文档,并插入一些句子。我需要在 Word 中突出显示黄色的句子。
这是我目前拥有的:
Set BreakDown = wrdApp.Selection
With BreakDown
.Font.Bold = True
.Shading.BackgroundPatternColor = wdColorYellow
.TypeText (BreakDownText & vbCrLf & vbCrLf)
End With
代码:
.Shading.BackgroundPatternColor = wdColorYellow
打开高亮但它设置颜色等于 wdColorBlack
这是我的出发点:
http://msdn.microsoft.com/en-us/library/office/ff845467(v=office.15).aspx
【问题讨论】:
-
wdColorYellow是一个 Word 常量,Excel VBA 不会自动知道它的值是什么。您需要在 Excel VBA 项目中添加对 Word 对象库的引用,或者使用该值而不是常量名称(如 Tinbendr 建议的那样)。