在 Word 文档中突出显示图表标题

Question

我想突出显示图表标题文本（几个字符）。

ReplaceWhat = "Before"
ReplaceWith = "After"
If chrt.HasTitle Then
    pos = InStr(chrt.ChartTitle.Characters.Text, ReplaceWhat)
    If pos > 0 Then
        chrt.ChartTitle.Characters(pos, Len(ReplaceWhat)).Text = ReplaceWith
        chrt.ChartTitle.Characters(pos, Len(ReplaceWhat)).Font.Bold = msoTrue
    End If
End If

我能够找到和替换图表标题文本，也能够使粗体。

用于更改文本颜色

chrt.ChartTitle.Format.TextFrame2.TextRange.Characters.Font.Fill.ForeColor.RGB = RGB(255, 255, 0)

未找到任何突出显示标题的解决方案。

Answer 1

也许试试这个：

Range("A1:A5").HighlightColorIndex = wdYellow 

有一个 Range 的属性叫做 Range.HighlightColorIndex = //wdColorIndex//