VBA～文字のフォントを変更しよう～Excel

文字のフォントを変更したい時はFont.Nameプロパティを使います。

単一セルのフォントを変更

単一セルのフォントを変更したい場合はRange(セル番地).Font.Name = "フォント名"で変更できます。下のコードを実行するとセルA1のフォントがArial Blackに変更されます。

Sub test1()
Range("A1").Font.Name = "Arial Black"
End Sub

セル全体のフォントを変更

セル全体のフォントを変更したい場合はCells.Font.Name = "フォント名"で変更できます。下のコードを実行するとセル全体のフォントがArial Blackに変更されます。

Sub test2()
Cells.Font.Name = "Arial Black"
End Sub

標準フォントに変更

標準フォントに変更したい場合はApplication.StandardFontプロパティで変更できます。下のコードを実行するとセル全体のフォントが標準フォントに変更されます。

Sub test3()
Cells.Font.Name = Application.StandardFont
End Sub