VBAでExcelのセルに色を塗るにはColorIndexプロパティ
またはColorプロパティを使用すると簡単に着色できます。
ColorIndexまたはColorを使用してセルに色を塗る
セルに色を塗るにはRange.Interior.ColorIndexまたは
Range.Interior.Colorに整数を入力します。
下記のコードではSheet1のA1をColorIndexプロパティを使用して黒に着色し
A2をColorプロパティを使用して黄色に着色しています。
ColorプロパティはRGB関数と組み合わせて使用します。
1 2 3 4 5 6 7 8 9 10 11 |
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関数の対応は下記になります。
コメント