in Zelle C7 steht ein Text, in dem einzelne Textzeichen in rot gefärbt werden. Das funktioniert.
Warum wird das entsprechende Zeichen, hier 3 verschiedene, NICHT fett erzeugt, mit ".Bold = True"? Es erscheint Fehler "438", "Objekt unterstützt die Eigenschaften der Methode nicht.". Wie muss der richtige Code dafür lauten?
Mit der Bitte um Hilfe,
grüßt Dieter(Drummer)
'Test OK, außer: Bold = True
Sub Test1()
'Celle C7
With ActiveSheet.Cells(7, 3)
.Characters(Start:=7, Length:=1).Font.ColorIndex = 3
.Bold = True
.Characters(Start:=17, Length:=1).Font.ColorIndex = 3
.Bold = True
.Characters(Start:=21, Length:=1).Font.ColorIndex = 3
.Bold = True
End With
End Sub