Clase ColorScaleCriterion (Excel VBA)

La clase ColorScaleCriterion representa los criterios de umbrales mínimo, de punto medio o máximo para un formato condicional de formato de colores.

Set

Para usar una variable de clase ColorScaleCriterion, primero debe ser instanciado, por ejemplo

Dim csc as ColorScaleCriterion
Set csc = ActiveCell.FormatConditions(1).ColorScaleCriteria(Index:=1)

Los siguientes procedimientos se pueden usar para establecer variables de clase ColorScaleCriterion : ColorScale.ColorScaleCriteria y ColorScaleCriteria.Item

For Each

A continuación, se muestra un ejemplo de cómo procesar los elementos ColorScaleCriterion en una colección.

Dim cscColorScaleCriteria As ColorScaleCriterion
For Each cscColorScaleCriteria In ActiveCell.FormatConditions(1).ColorScaleCriteria
	
Next cscColorScaleCriteria

ColorScaleCriteria.Count

Devuelve un valor de tipo Long que especifica el número de criterios de una regla de formato condicional de escala de colores.

El número de criterios es equivalente al número de valores de umbral asignados a una escala de colores.

Dim lngCount As Long
lngCount = ActiveCell.FormatConditions(1).ColorScaleCriteria.Count

ColorScaleCriteria.Item

Devuelve un único objeto ColorScaleCriterion de la colección ColorScaleCriteria .

El valor del parámetro index no puede ser mayor que el número de criterios establecidos para un formato condicional de escala de colores. Para averiguar el número de valores de umbral, use la propiedad Count .

Sintaxis : expression.Item (Index)

Index: Número de índice del objeto ColorScaleCriterion.

Dim cscItem As ColorScaleCriterion
Set cscItem = ActiveCell.FormatConditions(1).ColorScaleCriteria(Index:=1)

FormatColor

Devuelve un objeto FormatColor que especifica el color asignado al umbral de un formato condicional de escala de colores.

Puede establecer el color de los umbrales mínimo, de punto medio o máximo en cualquier color personalizado mediante la propiedad color o la propiedad ThemeColor del objeto FormatColor .

Dim fcrFormatColor As FormatColor
Set fcrFormatColor = ActiveCell.FormatConditions(1).ColorScaleCriteria(1).FormatColor

Index

Devuelve un valor de tipo Long que indica el umbral que el criterio representa.

Para una regla de formato condicional de escala de dos colores, esta propiedad devolverá un valor de "1" para el umbral mínimo y "2" para el umbral máximo.

Dim lngIndex As Long
lngIndex = ActiveCell.FormatConditions(1).ColorScaleCriteria(1).Index

Type

Devuelve una de las constantes de la enumeración XlConditionValueTypes , que especifica cómo se determinan los valores de umbral de un formato condicional de barra de datos o de escala de colores.

Valores posibles son xlConditionValueAutomaticMax - La barra de datos más larga es proporcional al valor máximo del rango, xlConditionValueAutomaticMin - La barra de datos más corta es proporcional al valor mínimo del rango, xlConditionValueFormula - Se utiliza una fórmula, xlConditionValueHighestValue - Valor más alto de la lista de valores, xlConditionValueLowestValue - Valor más bajo de la lista de valores, xlConditionValueNone - Ningún valor condicional, xlConditionValueNumber - Se utiliza un número, xlConditionValuePercent - Se utiliza un porcentaje, xlConditionValuePercentile - Se utiliza un percentil.

El tipo de valor de umbral de una barra de datos o escala de colores puede ser un número, un porcentaje, una fórmula o un percentil.

ActiveCell.FormatConditions(1).ColorScaleCriteria(1).Type = xlConditionValueAutomaticMax

Value

Devuelve o establece los valores de umbral de punto mínimo, medio y máximo para un formato condicional de escala de colores.

El valor solo se puede establecer si la propiedad Type del formato condicional está establecida en una de las siguientes constantes XlConditionValueTypes : xlConditionValueNumber, xlConditionValuePercent, ** xlConditionValuePercentile**o xlConditionValueFormula. Si el tipo de umbral es una fórmula, puede establecer la fórmula como un valor de tipo String.

ActiveCell.FormatConditions(1).ColorScaleCriteria(1).Value =