Dieser Beispielcode soll zeigen, dass man den Text, in einer Zelle, auch unterschiedliche Formatierungen zuweisen kann. Ich habe mir für Euch das folgende Beispiel ausgedacht:

Ich möchte in diesem Beispiel folgendes erreichen:
Es sollen in der Zelle B1, die Zahlen, welche sich in Zelle B3 befinden, Fett formatiert werden und obendrein noch in einer anderen Farbe erscheinen. Da wir ja nicht wissen, wie viele Zeichen in den Zellen stehen müssen wir die Länge, das machen wir mit dem Befehl LEN, ermitteln und können dann erst mit dem Formatieren beginnen. Das Makro würde dann ungefähr so ausschauen:

Option Explicit

Sub Text_formatieren()
    Dim i As Integer
    i = Len(Range("B3").Value)
    With Worksheets("Tabelle1").Range("B1").Characters(Len(Range("B1")) - i + 1, i).Font
        .ColorIndex = 3
        .Bold = True
    End With
End Sub