如何将突出显示颜色切换为黄色,以便在Word 2007中输入的文本?
-
12-12-2019 - |
题
在MS Word 2007中的VBA-MACRO中,我想将文本将文本突出显示为黄色的颜色,以便在光标位置键入的文本。
如果我想更改当前所选文本的颜色,我可以用
Selection.Range.HighlightColorIndex = wdYellow
但如果文本已存在并且被选中,则似乎仅工作。 我还可以将突出显示颜色设置为黄色,以便将在光标位置插入的文本?
(例如,如果我点击“粗体字体”按钮,则所有未来文本都会粗体, 但这似乎并没有与突出函数合作,或者有没有办法做到这一点?)
解决方案
所有未来文本将是大胆的
否,它不会。通过单击“生成码icetagcode”,将“文本中的当前点”标记为粗体,如果从该点进行键入,则文本将是粗体的,因为它是从粗体的位置键入,而不是因为按下按钮。如果单击“生成频划线”,将插入件移到其他地方并键入,不会粗体。
正确的方法是插入文本并将格式应用于其范围。
.Dim r As Range Set r = Selection.Range r.Collapse wdCollapseStart r.InsertAfter "Text to insert" r.HighlightColorIndex = wdYellow
不隶属于 StackOverflow