为未来的文本设置颜色

Question

在 PowerPoint 中，当我在文本框架内并且我没有选择任何文本然后设置文本颜色时，它不会更改任何当前可见文本的颜色。但是，它确实会更改我接下来要输入的文本的文本颜色。

我想使用办公室实现同样的效果 API。

我试过ActiveWindow.Selection.TextRange.Font.Color.RGB = RGB(255, 128, 0)，但这会将当前文本框的所有文本设置为这种颜色。

实现我想要实现的目标的正确方法是什么？

Answer 1

按照这些思路尝试一下：

With ActiveWindow.Selection.ShapeRange(1).TextFrame.TextRange
    With .Characters.InsertAfter(" ")
        .Font.Color.RGB = RGB(0, 255, 0)
    End With
End With

这会在当前所选形状文本的末尾插入一个 space，并将 space 设置为所需的颜色。之后添加的任何文本都将与 space 字符颜色相同。

为未来的文本设置颜色

Set color for future text

powerpoint

vsto

ms-office

office-interop