VBAでExcelのセルに色を塗るにはColorIndexプロパティ、またはColorプロパティを使用すると簡単に着色できます。

ColorIndexまたはColorを使用してセルに色を塗る

セルに色を塗るにはRange.Interior.ColorIndex、またはRange.Interior.Colorに整数を入力します。

下記のコードではSheet1のA1をColorIndexプロパティを使用して黒に着色しA2をColorプロパティを使用して黄色に着色しています。

ColorプロパティはRGB関数と組み合わせて使用します。

https://docs.microsoft.com/ja-jp/office/vba/language/reference/user-interface-help/rgb-function

Sub PaintRange()

  'ColorIndexプロパティを使用した方法
  'A1セルを黒に塗る
  ThisWorkbook.Worksheets("Sheet1").Range("A1").Interior.ColorIndex = 1
  
  'Colorプロパティを使用した方法
  'A2セルを黄色に塗る
  ThisWorkbook.Worksheets("Sheet1").Range("A2").Interior.Color = RGB(255, 255, 0)
  
End Sub

各色とColorIndex、Colorの対応表

各色とColorIndexプロパティ、Colorプロパティに設定するRGB関数の対応は下記になります。