Freigeben über

Databar-Objekt (Excel)

  • Artikel

Stellt eine eine Regel zur bedingten Formatierung von Datenbalken dar. Durch das Anwenden eines Datenbalkens auf einen Bereich können Sie den Wert einer Zelle relativ zu anderen Zellen anzeigen.

Hinweise

Alle Objekte der bedingten Formatierung sind in einem FormatConditions-Auflistungsobjekt enthalten, das ein untergeordnetes Element einer Range-Auflistung ist. Sie können eine Datenbalken-Formatierungsregel erstellen, indem Sie entweder die Add - oder AddDatabar-Methode der FormatConditions-Auflistung verwenden.

Mit der MinPoint-Eigenschaft und der MaxPoint-Eigenschaft des Databar-Objekts können Sie die Werte des kürzesten und des längsten Balkens in einem Datenbereich festlegen. Diese Eigenschaften geben ein ConditionValue-Objekt zurück, mit dem Sie angeben können, wie die Schwellenwerte ausgewertet werden.

Das Databar-Objekt stellt außerdem Eigenschaften bereit, mit deren Hilfe eine Achsenlinie angegeben werden kann, die beim Auftreten negativer Werte angezeigt wird, und die zum Angeben von Farbe und Formatierung von Datenbalken verwendet werden können.

Beispiel

Im folgenden Beispiel wird ein Datenbereich erstellt und dann ein Datenbalken auf den Bereich angewendet. Sie werden feststellen, dass die mittleren Werte aufgrund eines extrem niedrigen und hohen Werts über Datenbalken mit ähnlicher Länge verfügen. Um die mittleren Werte deutlicher zu unterscheiden, wird im Beispielcode das ConditionValue-Objekt verwendet, um die Auswertung der Schwellenwerte in Perzentile zu ändern.

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

Methoden

Eigenschaften

Siehe auch

Support und Feedback

Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.