Objeto ColorScaleCriterion (Excel)
Representa os critérios dos limites mínimos, médios e máximos de uma formatação condicional de formato de cor.
Comentários
Cada ColorScaleCriterion é parte da coleção ColorScaleCriteria. Use ColorScaleCriteria (index), para retornar um critério individual.
Você pode definir Type, Value e FormatColor de cada limite da escala de cores.
Exemplo
O exemplo de código a seguir cria um intervalo de números e aplica uma regra de formatação condicional de escala de duas cores a esse intervalo. A cor do limite mínimo é vermelho e o limite máximo é azul indexando na coleção ColorScaleCriteria para definir critérios individuais.
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
Propriedades
Confira também
Suporte e comentários
Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.