文字色の変更

下記画像の場合においてA1セルとC3～C5の文字色を変更します。

実装コードは下記の通り

Sub Fontcolor_Red()
  Range("A2").Font.Color = RGB(255, 0, 0)
  Range("C3:C5").Font.Color = RGB(255, 0, 0)
End Sub

実行結果

解説
・Font.Colorプロパティを使用します。
・色の指定はRGB値を使用しています。
　RGB値はフォントの色→その他の色→ユーザー設定タブで確認できます。

背景色の変更

下記画像の場合においてA2セルとC3～C5の背景色を変更します。

実装コードは下記の通り

Sub Backcolor_Red()
  Range("A2").Interior.Color = RGB(255, 0, 0)
  Range("C3:C5").Interior.Color = RGB(255, 0, 0)
End Sub

実行結果

解説
・Interior.Colorプロパティを使用します。
・色の指定はRGB値を使用しています。
　塗りつぶしの色→その他の色→ユーザー設定タブで確認できます。