Klasse ColorStop - Farbstopppunkt (Excel VBA)
Die Klasse ColorStop stellt den Farbstopppunkt für einen Farbenverlauf in einem Bereich oder einer Auswahl dar. Um eine ColorStop -Klassenvariable zu verwenden, muss sie zuerst instanziert werden, beispielsweise
Dim cstp as ColorStop
Set cstp = ActiveCell.Interior.Gradient.ColorStops(Index:=1)
For Each
Hier ist ein Beispiel für die Verarbeitung der ColorStop -Elemente in einer Sammlung
Dim cstp As ColorStop
For Each cstp In ActiveCell.Interior.Gradient.ColorStops
Next cstp
Color
Gibt die Farbe des dargestellten Objekts zurück oder legt sie fest.
ActiveCell.Interior.Gradient.ColorStops(1).Color =
Delete
Löscht das dargestellte Objekt.
ActiveCell.Interior.Gradient.ColorStops(1).Delete
Position
Gibt die Position des ColorStop-Objekts zurück oder legt sie fest.
ActiveCell.Interior.Gradient.ColorStops(1).Position =
ThemeColor
Gibt die Designfarbe des dargestellten Objekts zurück oder legt diese Farbe fest.
Range("A1:A10").Select
With Selection.Interior.Gradient.ColorStop.Add(1)
.ThemeColor = xlThemeColorAccent1
.TintAndShade = 0
End With
TintAndShade
Gibt den Farbton und die Schattierung des dargestellten Objekts zurück oder legt dies fest.