Objet Databar (Excel)

  • Article

Cet objet représente une règle de mise en forme conditionnelle de barre de données. L’utilisation d’une barre de données sur une plage vous permet de distinguer 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 de barre de données à l’aide des méthodes Add ou AddDatabar de la collection FormatConditions .

Utilisez les propriétés MinPoint et MaxPoint de l’objet Databar pour définir les valeurs de la barre la plus courte et de la barre la plus longue d’une plage de données. Ces propriétés retournent un objet ConditionValue , avec lequel vous pouvez spécifier la façon dont les seuils sont évalués.

L’objet Databar fournit également des propriétés vous permettant de spécifier un axe qui s’affiche en présence de valeurs négatives, ainsi que la couleur et la mise en forme des barres de données.

Exemple

L’exemple suivant crée une plage de données, puis applique une barre de données à la plage. Vous remarquerez qu’étant donné qu’il y a une valeur extrêmement faible et élevée dans la plage, les valeurs du milieu ont des barres de données de longueur similaire. Pour mieux distinguer ces valeurs, l’exemple de code utilise l’objet ConditionValue pour modifier l’évaluation des seuils et utiliser les centiles.

Sub CreateDatabarCF() 
 
 Dim cfDatabar As Databar 
 
 ' Create a range of data with a couple of extreme values 
 With ActiveSheet 
 .Range("D1") = 1 
 .Range("D2") = 45 
 .Range("D3") = 50 
 .Range("D2:D3").AutoFill Destination:=Range("D2:D8") 
 .Range("D9") = 500 
 End With 
 
 Range("D1:D9").Select 
 
 ' Create a data bar with default behavior 
 Set cfDatabar = Selection.FormatConditions.AddDatabar 
 MsgBox "Because of the extreme values, middle data bars are very similar" 
 
 ' The MinPoint and MaxPoint properties return a ConditionValue object 
 ' which you can use to change threshold parameters 
 cfDatabar.MinPoint.Modify newtype:=xlConditionValuePercentile, _ 
 newvalue:=5 
 cfDatabar.MaxPoint.Modify newtype:=xlConditionValuePercentile, _ 
 newvalue:=75 
 
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.