ColorScale-Objekt (Excel)
Stellt eine Regel zur bedingten Formatierung einer Farbskala dar.
Alle Objekte der bedingten Formatierung sind in einem FormatConditions-Auflistungsobjekt enthalten, das ein untergeordnetes Element einer Range-Auflistung ist. Sie können eine Farbskalaformatierungsregel erstellen, indem Sie entweder die Add- oder AddColorScale-Methode der FormatConditions-Auflistung verwenden.
Bei Farbskalen handelt es sich um visuelle Hilfen, durch die Sie die Datenverteilung und -streuung leichter erkennen können. Sie können auf einen Datenbereich, Daten in einer Tabelle oder Daten in einem PivotTable-Bericht Skalen mit zwei oder drei Farben anwenden. Bei einer bedingten Formatierung mit zwei Farben weisen Sie den Wert, Typ und die Farbe den niedrigsten und höchsten Schwellenwerten eines Bereichs zu. Eine Farbskala mit drei Farben verfügt außerdem über eine mittlere Schwelle.
Jeder dieser Schwellenwerte wird durch Festlegen der Eigenschaften des ColorScaleCriteria-Objekts bestimmt. Bei dem ColorScaleCriteria-Objekt (einem untergeordneten Element des ColorScale-Objekts) handelt es sich um eine Auflistung aller ColorScaleCriterion-Objekte für die Farbskala.
Im folgenden Codebeispiel wird ein Zahlenbereich erstellt und dann eine Regel zur bedingten Formatierung von Farbskalen mit zwei Farben auf den Bereich angewendet. Die Farbe für den niedrigsten Schwellenwert wird dann auf Rot und die des maximalen Schwellenwerts auf Blau festgelegt.
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
- Application
- AppliesTo
- ColorScaleCriteria
- Creator
- Formula
- Parent
- Priority
- PTCondition
- ScopeType
- StopIfTrue
- Type
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.