【VBA】セルに色を塗る ColorIndexとColor一覧

calendar · 1 分で読了 · VBA

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

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

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

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

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

 1Sub PaintRange()
 2
 3  'ColorIndexプロパティを使用した方法
 4  'A1セルを黒に塗る
 5  ThisWorkbook.Worksheets("Sheet1").Range("A1").Interior.ColorIndex = 1
 6  
 7  'Colorプロパティを使用した方法
 8  'A2セルを黄色に塗る
 9  ThisWorkbook.Worksheets("Sheet1").Range("A2").Interior.Color = RGB(255, 255, 0)
10  
11End Sub

各色とColorIndex、Colorの対応表

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

関連ページ