Remarque
L’accès à cette page nécessite une autorisation. Vous pouvez essayer de vous connecter ou de modifier des répertoires.
L’accès à cette page nécessite une autorisation. Vous pouvez essayer de modifier des répertoires.
Représente un visuel pour les valeurs au-dessus de la moyenne d’une règle de mise en forme conditionnelle. Applique une couleur ou un remplissage à une plage ou à une sélection pour vous aider à voir la valeur d’une cellule par rapport à d’autres cellules.
Remarques
Tous les objets de mise en forme conditionnelle sont contenus dans un objet de collection FormatConditions , qui est un enfant d’une collection Range .
Vous pouvez créer une règle de mise en forme des valeurs au-dessus de la moyenne à l’aide de la méthode Add ou AddAboveAverage de la collection FormatConditions.
Exemple
L'exemple suivant génère un jeu de données dynamique et applique la couleur aux valeurs moyennes précédentes par le biais de règles conditionnelles de mise en forme.
Sub AboveAverageCF()
' Building data for Melanie
Range("A1").Value = "Name"
Range("B1").Value = "Number"
Range("A2").Value = "Melanie-1"
Range("A2").AutoFill Destination:=Range("A2:A26"), Type:=xlFillDefault
Range("B2:B26").FormulaArray = "=INT(RAND()*101)"
Range("B2:B26").Select
' Applying Conditional Formatting to items above the average. Should appear green fill and dark green font.
Selection.FormatConditions.AddAboveAverage
Selection.FormatConditions(Selection.FormatConditions.Count).SetFirstPriority
Selection.FormatConditions(1).AboveBelow = xlAboveAverage
With Selection.FormatConditions(1).Font
.Color = -16752384
.TintAndShade = 0
End With
With Selection.FormatConditions(1).Interior
.PatternColorIndex = xlAutomatic
.Color = 13561798
.TintAndShade = 0
End With
MsgBox "Added an Above Average Conditional Format to Melanie's data. Press F9 to update values.", vbInformation
End Sub
Méthodes
Propriétés
- AboveBelow
- Application
- AppliesTo
- Borders
- CalcFor
- Creator
- Font
- Interior
- NumberFormat
- NumStdDev
- Parent
- Priority
- PTCondition
- ScopeType
- StopIfTrue
- Type
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.