Objet Top10 (Excel)

  • Article

Représente l’un des dix visuels supérieurs d’une règle conditionnelle de mise en forme. L’application d’une couleur à une plage améliore la visibilité de la valeur d’une cellule par rapport aux 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 top 10 à l’aide de la méthode Add ou AddTop10 de la collection FormatConditions .

Exemple

L'exemple suivant génère un jeu de données dynamique et applique la couleur aux dix valeurs principales par le biais de règles conditionnelles de mise en forme.

Sub Top10CF() 
 
' Building data 
 Range("A1").Value = "Name" 
 Range("B1").Value = "Number" 
 Range("A2").Value = "Agent1" 
 Range("A2").AutoFill Destination:=Range("A2:A26"), Type:=xlFillDefault 
 Range("B2:B26").FormulaArray = "=INT(RAND()*101)" 
 Range("B2:B26").Select 
 
' Applying Conditional Formatting Top 10 
 Selection.FormatConditions.AddTop10 
 Selection.FormatConditions(Selection.FormatConditions.Count).SetFirstPriority 
 With Selection.FormatConditions(1) 
 .TopBottom = xlTop10Top 
 .Rank = 10 
 .Percent = False 
 End With 
 
' Applying color fill 
 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 Top10 Conditional Format. Press F9 to update values.", vbInformation 
 
End Sub

Méthodes

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.