Compartilhar via

Objeto ColorScaleCriteria (Excel)

  • Artigo

Uma coleção de objetos ColorScaleCriterion que representa todos os critérios para um formato condicional de escala de cores. Cada critério especifica o limite mínimo, médio e máximo da escala de cores.

Comentários

Para retornar a coleção ColorScaleCriteria , use a propriedade ColorScaleCriteria do objeto ColorScale .

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.