在PowerPoint VBA中更改文本框的突出显示文本的颜色

Question

所以我想要一个按钮来更改PowerPoint VBA中TextBox的选定/突出显示的文本。 我知道如何更改TextBox上的所有文本，但不更改所选/突出显示的文本。

感谢阅读。

Answer 1

您希望确保当前选择并且在尝试更改任何内容之前选择是文本：

With ActiveWindow.Selection
    If .Type = ppSelectionText Then  ' Text is selected
        ' Make it green, for example:
        .TextRange.Font.Color.RGB = RGB(0, 255, 0)
    End If
End With