Schriftart einer Tabelle verändern
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