VBAでExcelのセルに色を塗るにはColorIndexプロパティ、またはColorプロパティを使用すると簡単に着色できます。
ColorIndexまたはColorを使用してセルに色を塗る #
セルに色を塗るにはRange.Interior.ColorIndex
、またはRange.Interior.Color
に整数を入力します。
下記のコードではSheet1のA1をColorIndexプロパティを使用して黒に着色しA2をColorプロパティを使用して黄色に着色しています。
ColorプロパティはRGB関数と組み合わせて使用します。
RGB 関数 (Visual Basic for Applications) | Microsoft Learn
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関数の対応は下記になります。