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.