Share via

ColorScaleCriterion 对象 (Excel)

  • 项目

代表颜色格式条件格式的最小、中点或最大阈值的条件。

备注

每个 ColorScaleCriterion 都是 ColorScaleCriteria 集合的一部分。 使用 ColorScaleCriteria (索引) 返回单个条件。

您可以设置色阶的每个阈值的 Type、Value 和 FormatColor。

示例

以下代码示例创建了一个数字范围，然后将双色色阶条件格式规则应用于该范围。 然后通过在 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 支持和反馈，获取有关如何接收支持和提供反馈的指南。