Compartir a través de


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.