【Excel VBA】セルのフォントサイズを変更する基本コードとやさしい解説

はじめに

Excelで作業をしていると、
「見出しを少し大きくしたい」
「データ部分は小さめに揃えたい」
そんな“読みやすさの調整”が必要になることがあります。

VBAでは、フォントサイズを自由に変更でき、
表の印象を静かに整えることができます。

ここでは、セルのフォントサイズを変更する基本のコードと、
実務で役立つポイントを解説します。

まずはコードを確認

Range("A1").Font.Size = 14

もっともシンプルな書き方です。
A1セルのフォントサイズを 14 に変更します。

フォントサイズ変更の基本

単一セルのフォントサイズを変更する

Range("A1").Font.Size = 12

複数セルをまとめて変更する

Range("A1:D1").Font.Size = 14

変数を使って柔軟に変更する

Dim size As Long
size = 16
Range("A1").Font.Size = size

動的にサイズを変えたいときに使います。

具体的な例で理解する

見出し行を大きめに整える

With Range("A1:D1")
    .Font.Size = 14
    .Font.Bold = True
    .HorizontalAlignment = xlCenter
End With

フォントサイズと太字を組み合わせると、
見出しが落ち着いた印象でまとまります。

データ部分を小さめに揃える

Range("A2:D100").Font.Size = 10

大量データを扱うときに読みやすくなります。

条件に応じてフォントサイズを変える

If Range("B2").Value > 1000 Then
    Range("B2").Font.Size = 14
End If

強調したい値だけ大きくする実務でよく使うパターンです。

フォントサイズ変更の注意点（実務で特に大切）

• セルの高さが自動調整されないことがある
  → 必要に応じて Rows(i).AutoFit を使うと整います。

• 大きすぎるフォントはレイアウトを崩す
  → 見出し以外は控えめなサイズが安心です。

• 条件付き書式と競合する場合がある
  → 条件付き書式が優先されるため、VBAの設定が反映されないことがあります。

応用：フォントサイズをクリアする（標準に戻す）

Range("A1:D10").Font.Size = 11   '標準サイズに戻す

標準フォントサイズに揃えたいときに使います。

応用：フォントサイズと書式をまとめて設定する

With Range("A1")
    .Font.Size = 16
    .Font.Bold = True
    .Font.Color = vbBlue
End With

見出しのデザインを一括で整えられます。

まとめ

• Range(“A1”).Font.Size = 数値 でフォントサイズを変更できる

• 見出し・データ部分など、範囲ごとに整えると読みやすさが向上

• 条件に応じたフォントサイズ変更も可能

• 行の高さや条件付き書式との関係に注意

• 標準サイズに戻すことも簡単

フォントサイズの調整は、
表の“読みやすさ”を静かに支える大切な作業です。

---