Forcer une mise en forme texte dans une cellule exel

Bonjour,

Je souhaite mettre en forme des données texte dans un tableau.
Ce texte comprends juste 3 caractères avec un espace entre le deuxième et le troisième caractère.
Je n'arrive pas à créer l'espace entre le deuxième et le troisième caractère.

Ma macro:
Sub FORMAT_Spé2()

With Selection.Characters(Start:=1, Length:=1).Font
.Name = "Calibri"
.Size = 17
.ThemeColor = xlThemeColorLight1

With Selection.Characters(Start:=2, Length:=1).Font
.Name = "Calibri"
.FontStyle = "Bold"
.Size = 15
.ThemeColor = xlThemeColorLight1

With Selection.Characters(Start:=3, Length:=1).Font
.Name = "Calibri"
.Size = 9
.Color = -16776961

End With
End With
End With

Une idée ?
Merci pour votre aide.

Phil