Установить цвет для будущего текста

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

Вставляет пробел в конец текста текущей выбранной фигуры и устанавливает желаемый цвет. Любой текст, добавленный после этого, будет того же цвета, что и символ пробела.