Classe FormatColor - couleur (Excel VBA)
La classe FormatColor représente la couleur de remplissage spécifiée pour un seuil d'une mise en forme conditionnelle de l'étendue de couleur ou la couleur de la barre dans un format conditionnel de barre de données. Pour utiliser une variable de classe FormatColor, elle doit d'abord être instanciée, par exemple
Dim fcr as FormatColor
Set fcr = ActiveCell.FormatConditions(1).AxisColor
Color
Renvoie ou définit la couleur de remplissage associée à un seuil pour une barre de données ou une règle de mise en forme conditionnelle d’échelle de couleur.
La couleur de format est exprimée sous la forme d'une fonction RGB . Par exemple, pour définir la couleur sur rouge, utilisez RGB(255,0,0).
ActiveCell.FormatConditions(1).AxisColor.Color = RGB(0,0,255)'blue
ColorIndex
Cette propriété renvoie ou définit l'une des constantes de l'énumération XlColorIndex , indiquant si la couleur de remplissage est exprimée sous la forme d'une valeur d'index dans la palette de couleurs actuelle. Les valeurs de retour possibles sont xlColorIndexAutomatic - Couleur automatique, xlColorIndexNone - Aucune couleur.
Cette propriété est utilisée pour chaque seuil d'une règle de mise en forme conditionnelle d'échelle de couleur ou de barre de données.
ActiveCell.FormatConditions(1).AxisColor.ColorIndex = xlColorIndexAutomatic
ThemeColor
Cette propriété renvoie ou définit l'une des constantes de l'énumération XlThemeColor , spécifiant la couleur de thème utilisée dans un seuil de barre de données ou un format conditionnel d'étendue de couleur. Ici on trouve valeurs possible pour
ActiveCell.FormatConditions(1).AxisColor.ThemeColor = xlThemeColorAccent1
TintAndShade
Renvoie ou définit une valeur de type Single qui éclaircit ou assombrit la couleur de remplissage d’une cellule pour un seuil de barre de données ou la mise en forme conditionnelle de l’échelle de couleurs.
Vous pouvez entrer un nombre compris entre -1 (zones les plus sombres) et 1 (plus claires) pour la propriétéTintAndShade. Zéro (0) est neutre.
ActiveCell.FormatConditions(1).AxisColor.TintAndShade =