Поделиться через

Объект ColorScale (Excel)

Представляет правило условного форматирования цветовой шкалы.

Замечания

Все объекты условного форматирования содержатся в объекте коллекции FormatConditions , который является дочерним объектом коллекции Range . Правило форматирования цветовой шкалы можно создать с помощью метода Add или AddColorScale коллекции FormatConditions .

Цветовые шкалы — это визуальные руководства, помогающие понять распределение и вариации данных. К диапазону данных, данных в таблице или в отчете сводной таблицы можно применить двухцветную или трехцветную шкалу. Для условного формата двухцветной шкалы необходимо назначить значение, тип и цвет минимальным и максимальным пороговым значениям диапазона. Трехцветная шкала также имеет пороговое значение в середине.

Каждое из этих пороговых значений определяется путем задания свойств объекта ColorScaleCriteria . Объект ColorScaleCriteria , являющийся дочерним для объекта ColorScale , представляет собой коллекцию всех объектов ColorScaleCriterion для цветовой шкалы.

Пример

В следующем примере кода создается диапазон чисел, а затем применяется правило условного форматирования двухцветной шкалы к данному диапазону. Затем цвет для минимального порогового значения присваивается красному, а максимальное пороговое значение — синему.

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 и обратная связь.

  • Last updated on