Kategorien

Artikel-Schlagworte: „Text“

Textformatierung

Nachfolgender Code bewirkt, dass der Bereich von "B1" bis "C10" dunkelrot hinterlegt wird und die Schrift fett ausgegeben wird.
Sub Textformatierung()
With Sheets("TestA").Range("B1:C10")
.Interior.ColorIndex = 30
.Font.Bold = True
End With
End Sub


Der With-Befehl
Durch die Verwendung von "With" können dem Objekt mehrere Eigenschaften mitgegeben werden, ohne das Objekt für jede einzelne Eigenschaft wieder neu definieren zu müssen. Hier werden mit dem "With"-Befehl die Hintergrundfarbeneigenschaft und die Fettung der Schrift des Objektes zugewiesen.

Schrifteigenschaften

Die Schrift wird mit ".Font" angesprochen, danach erfolgt die Bestimmung der Eigenschaft der Schrift.

Diese werden mit True und False nach dem "=" aktiviert oder deaktiviert:

  • Bold = Fettdruck

  • Italic = Kursivdruck

  • Underline = unterstreichen der Schrift

  • Strikethrough = durchgestrichene Schrift

  • Subscript = tiefgestellte Schrift

  • Superscript = hochgestellte Schrift


Hier ist nach dem "=" eine Zahl zu erfassen:

  • ColorIndex = Farbe

  • Size = Größe


Für die Farbe ist der jeweilige Farbcode gem. ColorIndex einzutragen, für die Größe die gewünschte Schriftgröße in pt.