Schrift fett?
27.02.2003 08:42:57
Sven
wie kann ich z.B. die ersten 3 Zeilen auf einem Shape nachträglich fett machen?
Vielleicht geht's auch gleich beim Erstellen. Mein Code zum Erstellen:
For i = anfang To ende
If i < ende Then
ml_string = Sheets(1).Cells(i, 6).Text & Chr(10)
Else
ml_string = Sheets(1).Cells(i, 6)
End If
Worksheets(worksheet_name).Activate
ActiveSheet.Shapes("Kommentar" & iZ).Select
Selection.Characters(string_len + 1).Insert String:=ml_string
string_len = string_len + Len(ml_string)
Next i
Ich sag schon mal besten Dank.
Gruß
Sven
Bitte in VBA.
Anzeige