Partager via

Objet ColorScaleCriterion (Excel)

  • Article

Cet objet représente les critères pour les seuils minimum, intermédiaire ou maximum d'un format conditionnel de format de couleur.

Remarques

Chaque ColorScaleCriterion appartient à la collection ColorScaleCriteria. Utilisez ColorScaleCriteria (index) pour renvoyer un critère individuel.

Vous pouvez définir les valeurs Type, Value et FormatColor de chaque seuil pour l'échelle de couleur.

Exemple

L'exemple de code suivant crée une plage de nombres et lui applique une règle de mise en forme conditionnelle d'échelle de deux couleurs. La couleur du seuil minimum est ensuite associée au rouge et le seuil maximum au bleu en indexant dans la collection ColorScaleCriteria pour définir les critères individuels.

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

Propriétés

Voir aussi

Assistance et commentaires

Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.