Ich habe im Excel in einer Spalte Texte mit verschiedener Länge (1-40 Zeichen). Ich möchte ab der 21. Stelle diesen Text auf Schriftfarbe rot ändern. Ist sowas möglich?
Danke für Eure Hilfe, Leo
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Not Intersect(Target, Range("B:B")) Is Nothing Then
If Len(Target) > 21 Then
Target.Characters(Start:=21, Length:=Len(Target) - 20).Font.ColorIndex = 3
End If
End If
End Sub
Gruß,Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden
Suche nach den besten AntwortenEntdecke unsere meistgeklickten Beiträge in der Google Suche
Top 100 Threads jetzt ansehen