Nota
O acesso a esta página requer autorização. Pode tentar iniciar sessão ou alterar os diretórios.
O acesso a esta página requer autorização. Pode tentar alterar os diretórios.
Representa a cor de preenchimento especificada para um limiar de um formato condicional de escala de cores ou a cor da barra num formato condicional de barra de dados.
Comentários
Pode escolher uma cor ao transmitir um valor RGB na propriedade Cor ou designar a cor ao indexar na paleta de cores do tema com a propriedade ThemeColor .
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. Em seguida, a cor do limiar mínimo é atribuída a vermelho e o limiar máximo a azul ao indexar 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.