Schriftart einer Tabelle verändern
© sdecoret - Adobe Stock

Schriftart einer Tabelle verändern

Wie Sie die Schrift per Makro anpassen

Sie können die Schrift für Zellen Ihrer Wahl ändern, indem Sie die Zellen formatieren oder eine Schrift über die Schriftartliste auswählen.

Aber wie erledigen Sie das für Zellen der aktuellen Tabelle per Makro? Das folgende Makro zeigt, wie es geht:

 

Sub StelleSchriftartEin()
With ActiveSheet.Cells.Font
 .Size = 10
 .Name = "Courier"
End With
End Sub

Das Makro passt die Schrift in allen Zellen der Tabelle an, die zum Zeitpunkt des Aufrufs die aktuelle Tabelle ist. Das Makro verwendet die Schrift Courier in der Größe 10. Falls Sie eine andere Schriftart verwenden möchten, passen Sie das Makro entsprechend an.

Tipp: Falls Sie wissen möchten, wie Sie Makros in Excel eingeben und starten, finden Sie hier eine Kurzbeschreibung: http://www.exceldaily.de/excel-makros-vba/artikel/d/so-geben-sie-makros-in-excel-ein.html