Объект FormatColor (Excel)

Статья
04/07/2023

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

Замечания

Вы можете выбрать цвет, передав значение RGB в свойстве Color , или назначить цвет путем индексирования в цветовой палитре темы с помощью свойства ThemeColor .

Пример

В следующем примере кода создается диапазон чисел, а затем применяется правило условного форматирования двухцветной шкалы к данному диапазону. Цвет для минимального порогового значения затем присваивается красному, а максимальный порог — синему путем индексирования в коллекции 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 и обратная связь.

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