セルの文字色を指定するには、FontオブジェクトのColorプロパティやColorIndexプロパティを使います。
セルの背景色を指定するにはInteriorオブジェクトを取得して、ColorプロパティやColorIndexプロパティで指定します。
セルの文字色やセルの背景色を設定する

セルA3~セルF3のフォントの色と背景色を設定するマクロです。
コードの書き方は一つではありません。同じ結果になります。
■ コード内を「Wクリック」で選択できます。
Sub サンプル5002_1() <pre><code>With Range("A3:F3") .Font.Color = RGB(0, 112, 192) .Interior.Color = RGB(146, 208, 80) .Font.ColorIndex = 3 .Interior.ColorIndex = 20 End With</code></pre> End Sub
• With Range(“A3:F3”)
’Withステートメント でセルA3~セルF3を指定します。
• Font.Color = RGB(0, 112, 192)
’文字の色を RGB関数 で指定します。

• Interior.Color = RGB(146, 208, 80)
’セルの背景色をRGB関数で指定します。

• Font.ColorIndex = 3
’ColorIndex番号 で文字色を「赤」にします。

• Interior.ColorIndex = 20
’ColorIndex番号で背景色を「薄い青」にします。

■ 色の値
色 名 | カラーインデックス | RGB関数 | RGB関数の戻り値 |
---|---|---|---|
黒 | 1 | RGB(0,0,0) | 0 |
赤 | 3 | RGB(255,0,0) | 255 |
緑 | 4 | RGB(0,255,0) | 65280 |
青 | 5 | RGB(0,0,255) | 16711680 |
黄色 | 6 | RGB(255,255,0) | 65535 |
シアン | 8 | RGB(0,255,255) | 16776960 |
マゼンタ | 7 | RGB(255,0,255) | 16711935 |
白 | 2 | RGB(255,255,255) | 16777215 |
■ RGB関数の戻り値の計算方法
RGB(赤、緑、青)として
戻り値=(赤の数値)+(緑の数値×256)+(青の数値×256の2乗)で計算します。
色の指定は カラーインデックス を使うと簡単です。
シートのタブの色を設定する
セルの色ではなくワークシートのタブの色を設定するには、次のようにコードを書きます。
コードの書き方は一つではありません。同じ結果になります。
■ コード内を「Wクリック」で選択できます。
Sub サンプル5002_2() <pre><code>ActiveSheet.Tab.ColorIndex = 4 ActiveSheet.Tab.Color = RGB(0, 255, 0)</code></pre> End Sub
• ActiveSheet.Tab.ColorIndex = 4
’ColorIndex番号で、タブの色を緑にします。
• ActiveSheet.Tab.Color = RGB(0, 255, 0)
’RGB関数で緑を指定します。

以上で「セルの文字色や背景色を設定するマクロ」の説明を終わります。