Clase FormatColor - color (Excel VBA)

La clase FormatColor representa el color de relleno especificado para un umbral de un formato condicional de escala de colores o el color de la barra en un formato condicional de barra de datos.

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

Dim fcr as FormatColor
Set fcr = ActiveCell.FormatConditions(1).AxisColor

Los siguientes procedimientos se pueden usar para establecer variables de clase FormatColor : ColorScaleCriterion.FormatColor, Databar.AxisColor, Databar.BarColor, DataBarBorder.Color, NegativeBarFormat.BorderColor, NegativeBarFormat.Color, SparkColor.Color y SparklineGroup.SeriesColor.

Color

Devuelve o establece el color de relleno asociado con un umbral para una regla de formato condicional de barra de datos o de escala de colores.

El color de formato se expresa como una función RGB .

ActiveCell.FormatConditions(1).AxisColor.Color = RGB(0,0,255)'blue

ColorIndex

Devuelve o establece una de las constantes de la enumeración XlColorIndex , especificando si el color de relleno se expresa como un valor de índice en la paleta de colores actual. Posibles valores de retorno son xlColorIndexAutomatic - Color automático, xlColorIndexNone - Sin color.

Esta propiedad se utiliza para cada umbral de una regla de formato condicional de escala de colores o de barra de datos.

ActiveCell.FormatConditions(1).AxisColor.ColorIndex = xlColorIndexAutomatic

ThemeColor

Devuelve o establece una de las constantes de la enumeración XlThemeColor , que especifica el color del tema usado en un umbral de un formato condicional de barra de datos o de escala de colores. Aquí puede ver valores posibles para XlThemeColor.

ActiveCell.FormatConditions(1).AxisColor.ThemeColor = xlThemeColorAccent1

TintAndShade

Devuelve o establece un valor Single que aclara u oscurece el color de relleno de una celda que contiene el umbral de una regla de formato condicional de barra de datos o de escala de colores.

Puede escribir un número comprendido entre-1 (más oscuro) y 1 (más claro) para la propiedad TintAndShade .

ActiveCell.FormatConditions(1).AxisColor.TintAndShade =