Objeto ColorScaleCriteria (Excel)
Colección de objetos ColorScaleCriterion que representa todos los criterios para un formato condicional de escala de colores. Cada criterio especifica los umbrales mínimo, de punto medio o máximo de la escala de colores.
Comentarios
Para devolver la colección ColorScaleCriteria , use la propiedad ColorScaleCriteria del objeto ColorScale .
Ejemplo:
El ejemplo de código siguiente crea un rango de números y después le aplica a dicho rango una regla de formato condicional de escala de dos colores. Al umbral mínimo se le asigna el color rojo y al umbral máximo, el azul realizando referencias al índice de la colección ColorScaleCriteria para establecer los criterios individuales.
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
Propiedades
Vea también
Soporte técnico y comentarios
¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.