セルの文字のフォントを設定/取得する【Font.Nameプロパティ】【ExcelVBA】

構文
Font.Nameプロパティのサンプルコード
注意点
関連記事

構文

Range.Name

Name・・・セルのフォント名を取得/設定

Rangeオブジェクトの FontのName プロパティでフォント名を取得/反映します。

シート内のフォントを統一し、見やすくする場合などに設定します。

Font.Nameプロパティのサンプルコード

Public Sub sample()

    '■セルA1のフォントを「HG丸ｺﾞｼｯｸM-PRO」にする
    Range("A1").Font.Name = "HG丸ｺﾞｼｯｸM-PRO"
    
    '■セルA1を含む表に対して、フォントを「ＭＳ Ｐ明朝」にする
    Range("A1").CurrentRegion.Font.Name = "ＭＳ Ｐ明朝"

    '■セルB1に対して、フォントを「游ゴシック」にする（変数で反映）
    Dim tmp As String: tmp = "游ゴシック"
    Range("B1").Font.Name = tmp
                
    '■シート全体のフォントを「MS Pゴシック」にする
    Cells.Font.Name = "ＭＳ Ｐゴシック"

    '■セルA1のフォントを取得する
    Debug.Print Range("A1").Font.Name   'ＭＳ Ｐゴシック
    
End Sub