【作成中】【Excel VBA】セルのフォントの書式設定

RangeオブジェクトのFontプロパティは、指定したオブジェクトのフォントを表すFontオブジェクトを返します。

フォントを設定する

FontオブジェクトのNameプロパティは「游ゴシック」や「メイリオ」のようなフォント名の取得および設定に使用できます。［セルの書式設定］ダイアログボックスの［フォント］タブにある［フォント名］の一覧に表示されているフォント名を指定できます。

フォント名を文字列で指定します。

Rangeオブジェクト.Font.Name
Rangeオブジェクト.Font.Name = フォント名

次の例は、セル範囲のフォントをメイリオに設定し、メッセージボックスで設定された値を表示します。

Sub sample()
    Range("B2:E5").Font.Name = "メイリオ"
    MsgBox Range("B2:E5").Font.Name
End Sub

フォントのサイズを設定する

Rangeオブジェクト.Font.Size
Rangeオブジェクト.Font.Size = 設定値

Application.StandardFontSize

文字の色を設定する

RGB値で設定する

FontオブジェクトのColorプロパティは

Rangeオブジェクト.Font.Color
Rangeオブジェクト.Font.Color = 設定値

RGB関数の構文は次の通りで、引数のred、green、blueには、それぞれの色の成分を0～255の範囲の整数値で指定します。

RGB(red, green, blue)

定義済みの定数で設定する

インデックス番号で設定する

Rangeオブジェクト.Font.ColorIndex
Rangeオブジェクト.Font.ColorIndex = 設定値

太字、斜体、下線

文字を太字にするにはBoldプロパティ、斜体にするにはItalicプロパティ、下線を設てきすとろめとるふぁん定するにはUnderlineプロパティを使います。それぞれTrueとFalseの値を取ります。

フォントを太字にする

Rangeオブジェクト.Font.Bold
Rangeオブジェクト.Font.Bold = TrueまたはFalse

フォントを斜体にする

Rangeオブジェクト.Font.Italic
Rangeオブジェクト.Font.Italic = TrueまたはFalse

フォントに下線を引く

Rangeオブジェクト.Font.Underline
Rangeオブジェクト.Font.Underline = TrueまたはFalse