以黄色突出显示字符串中的单词（句子）

Question

我在 vba 中从 excel 创建了一个小的 word 文档。 我想用黄色突出显示句子中的一个词。 目前，这就是我正在做的事情：

        wdDoc.Content.Paragraphs.Last.Range.Characters(60).Shading.BackgroundPatternColor = wdColorYellow

...这对一个角色有好处，但对几个角色不利。 就我而言，我通过重复上面的这一行并更改索引来突出显示一个 7 个字符的单词。

但是，我很好奇，想知道是否有更好的方法来做到这一点。 谢谢。

Answer 1

我测试了这个小片段。 它确定文档中过去段落的第 60 个字符的位置，然后设置从那里开始的范围。

Dim wdDoc As Document
Dim p As Long

Set wdDoc = ActiveDocument
p = wdDoc.Paragraphs.Last.Range.Characters(60).Start
wdDoc.Range(p, p + 7).Shading.BackgroundPatternColor = wdColorYellow

应该有更简单的方法来做到这一点，但我没有找到。