ColorScaleCriterion オブジェクト (Excel)
色書式の条件付き書式の最小、中間、最高しきい値の条件を表します。
注釈
各 ColorScaleCriterion は 、ColorScaleCriteria コレクションの一部です。 ColorScaleCriteria (インデックス) を使用して、個々の条件を返します。
カラー スケールの各しきい値の Type, Value と FormatColor を設定できます。
例
次のコード例は、数値の範囲を作成し、2 色スケールの条件付き書式ルールをその範囲に適用します。 その後、ColorScaleCriteria コレクションにインデックスを作成し、最小しきい値の色を赤に割り当て、最高しきい値の色を青に割り当て、個別の条件を設定します。
Sub CreateColorScaleCF()
Dim cfColorScale As ColorScale
'Fill cells with sample data from 1 to 10
With ActiveSheet
.Range("C1") = 1
.Range("C2") = 2
.Range("C1:C2").AutoFill Destination:=Range("C1:C10")
End With
Range("C1:C10").Select
'Create a two-color ColorScale object for the created sample data range
Set cfColorScale = Selection.FormatConditions.AddColorScale(ColorScaleType:=2)
'Set the minimum threshold to red and maximum threshold to blue
cfColorScale.ColorScaleCriteria(1).FormatColor.Color = RGB(255, 0, 0)
cfColorScale.ColorScaleCriteria(2).FormatColor.Color = RGB(0, 0, 255)
End Sub
プロパティ
関連項目
サポートとフィードバック
Office VBA またはこの説明書に関するご質問やフィードバックがありますか? サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。