Vba 如何将Word 2007中键入的文本的突出显示颜色切换为黄色？_Vba_Formatting_Ms Word_Office 2007

Vba 如何将Word 2007中键入的文本的突出显示颜色切换为黄色？

vba formatting ms-word

Vba 如何将Word 2007中键入的文本的突出显示颜色切换为黄色？,vba,formatting,ms-word,office-2007,Vba,Formatting,Ms Word,Office 2007,在MS Word 2007中的VBA宏中，我希望将下一步在光标位置键入的文本的文本高亮显示颜色切换为黄色如果要更改当前选定文本的颜色，可以使用 Selection.Range.HighlightColorIndex=wdYellow 但这似乎只有在文本已经存在并被选中的情况下才起作用。我还可以将插入光标位置的文本的高亮颜色设置为黄色吗（例如，如果我点击“粗体”按钮，所有未来的文本都将是粗体，但这似乎不适用于突出显示功能，或者有办法做到这一点吗？）今后所有文本都将以粗体显示不，不会的。

在MS Word 2007中的VBA宏中，我希望将下一步在光标位置键入的文本的文本高亮显示颜色切换为黄色

如果要更改当前选定文本的颜色，可以使用

Selection.Range.HighlightColorIndex=wdYellow

但这似乎只有在文本已经存在并被选中的情况下才起作用。我还可以将插入光标位置的文本的高亮颜色设置为黄色吗

（例如，如果我点击“粗体”按钮，所有未来的文本都将是粗体，但这似乎不适用于突出显示功能，或者有办法做到这一点吗？）

今后所有文本都将以粗体显示

不，不会的。单击

bold

可将文本中的当前点标记为粗体，如果从该点继续键入，文本将变为粗体，因为它是从粗体位置键入的，而不是因为按下按钮。如果单击“加粗”，将插入符号移动到其他位置并键入，它将不会加粗

正确的方法是插入文本并对其范围应用格式

Dim r As Range
Set r = Selection.Range

r.Collapse wdCollapseStart
r.InsertAfter "Text to insert"
r.HighlightColorIndex = wdYellow