EXCEL VBA - 背景色の取得と設定

背景色の取得

背景色の取得は Range オブジェクトの Interior プロパティを使用します。

Debug.Print (Range("A1").Interior.ColorIndex)
背景色の取得

背景色の設定

背景色を設定するには、ColorIndex プロパティ、または Color プロパティを使用します。ColorIndex プロパティでは 57 種類の色から選択することができます。Color プロパティでは RGB 形式によって色を指定します。

Range("A1").Interior.ColorIndex = 10
Range("A1").Interior.Color = RGB(255, 0, 0)
背景色の設定

また、背景色を自動設定にしたり、色なしにする場合は、以下のように記述します。

Range("A1").Interior.ColorIndex = xlColorIndexAutomatic ' 自動設定
Range("A1").Interior.ColorIndex = xlColorIndexNone ' 色なし
背景色の設定

また、セルの背景には網かけを行うことができます。網かけは、網のパターンと網の色を指定して行います。網のパターンは、Interior オブジェクトの Pattern プロパティで指定します。

Range("A1").Interior.Pattern = xlVertical
網のパターンの設定

設定可能な網かけのパターンは、以下のように定義されています。

網かけのパターンの定数一覧
定数網かけのパターン
xlSolid1塗りつぶし(網かけなし)
xlGray75-412675%灰色
xlGray50-412550%灰色
xlGray25-412425%灰色
xlGray161712.5%灰色
xlGray8186.25%灰色
xlHorizontal-4128横縞
xlVertical-4166縦縞
xlDown-4121右下がり縞
xlUp-4162右上がり縞
xlChecker9斜線格子
xlSemiGray7510極太斜線格子
xlLightHorizontal11横縞(広)
xlLightVertical12縦縞(広)
xlLightDown13右下がり縞(広)
xlLightUp14右上がり縞(広)
xlGrid15格子
xlCrissCross16斜線格子(薄)

網の色の指定は Interior オブジェクトの PatternColorIndex プロパティ、または PatternColor プロパティで指定します。PatternColorIndex プロパティでは 57 種類の色から選択することができます。PatternColor プロパティでは RGB 形式によって色を指定します。

Range("A1").Interior.PatternColorIndex = 10
Range("A1").Interior.PatternColor = RGB(255, 0, 0)
網の色の設定

また、網の色を自動設定にしたり、色なしにする場合は、以下のように記述します。

Range("A1").Interior.PatternColorIndex = xlColorIndexAutomatic ' 自動設定
Range("A1").Interior.PatternColor = xlColorIndexNone ' 色なし
網の色の設定

関連記事