Si c'est juste le texte d'une cellule, alors tu sélectionne le caractère concerné dans la barre de formule et tu changes la couleur ..
Par contre si c'est pour un beaucoup de cellules, on peut faire une macro qui va le faire tout seul :
Par exemple pour faire toute la 1ère colonne (A) :
Sub Couleur()
Dim LongueurTexte As Integer
Dim Ligne As Long
For Ligne = 1 To Range("A1").End(xlDown).Row
LongueurTexte = Len(Range("A" & Ligne).Text)
If LongueurTexte >= 10 Then
Range("A" & Ligne).Cells.Characters(Start:=1, Length:=9).Font.ColorIndex = 1
Range("A" & Ligne).Cells.Characters(Start:=10, Length:=1).Font.ColorIndex = 3
If LongueurTexte >= 11 Then Range("A" & Ligne).Cells.Characters(Start:=11, Length:=LongueurTexte - 10).Font.ColorIndex = 1
End If
Next Ligne
End Sub