Wenn Sie wissen, dass Sie immer an bestimmten Zeichenpositionen innerhalb der Zeichenfolge arbeiten möchten, wird dieser VBA-Ausschnitt in PPT für Sie erledigt:
Option Explicit ' Edit these as needed to control where the color change starts/stops Const lStartChar As Long = 2 Const lNumChars As Long = 4 Sub ChangeFontColor() ' This assumes that you've selected the text you want to operate on With ActiveWindow.Selection.TextRange.Characters(lStartChar, lNumChars) .Font.Color.RGB = RGB(255, 0, 0) End With End Sub