ColorScaleCriterion オブジェクト (Excel)ColorScaleCriterion object (Excel)

色書式の条件付き書式の最小、中間、最高しきい値の条件を表します。Represents the criteria for the minimum, midpoint, or maximum thresholds for a color format conditional format.


ColorScaleCriterionは、 ColorScaleCriteria コレクションに含まれています。Each ColorScaleCriterion is part of the ColorScaleCriteria collection. ColorScaleCriteria (インデックス) を使用して、個々の条件を返します。Use ColorScaleCriteria (index), to return an individual criterion.

カラー スケールの各しきい値の Type, ValueFormatColor を設定できます。You can set the Type, Value, and FormatColor of each threshold for the color scale.


次のコード例は、数値の範囲を作成し、2 色スケールの条件付き書式ルールをその範囲に適用します。The following code example creates a range of numbers and then applies a two-color scale conditional formatting rule to that range. その後、ColorScaleCriteria コレクションにインデックスを作成し、最小しきい値の色を赤に割り当て、最高しきい値の色を青に割り当て、個別の条件を設定します。The color for the minimum threshold is then assigned to red and the maximum threshold to blue by indexing into the ColorScaleCriteria collection to set individual criteria.

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 
 '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


関連項目See also

サポートとフィードバックSupport and feedback

Office VBA またはこの説明書に関するご質問やフィードバックがありますか?Have questions or feedback about Office VBA or this documentation? サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.