Freigeben über


FillFormat.GradientVariant-Eigenschaft (Publisher)

Gibt ein Long zurück, der die Farbverlaufsvariante für die angegebene Füllung angibt. Werte sind in der Regel ganze Zahlen von 1 bis 4 für die meisten gradientenfüllungen. Wenn die Verlaufsart MsoGradientFromTitle oder msoGradientFromCenter festgelegt ist, gibt diese Eigenschaft entweder 1 oder 2 zurück.

Die Werte für diese Eigenschaft entsprechen den Verlaufsvarianten (Nummerierung von links nach rechts und von oben nach unten) auf der Registerkarte Graduell im Dialogfeld Fülleffekte. Schreibgeschützt.

Syntax

Ausdruck. GradientVariant

Ausdruck Eine Variable, die ein FillFormat-Objekt darstellt.

Rückgabewert

Long

HinwBemerkungeneise

Verwenden Sie die Methode OneColorGradient, PresetGradient oder TwoColorGradient, um die Farbverlaufsvariante für die Füllung festzulegen.

Beispiel

Dieses Beispiel fügt der aktiven Publikation ein Rechteck hinzu und legt dessen Füllungsfarbverlaufs-Variante so fest, dass sie mit dem der Form namens "rect1" übereinstimmt. Damit dieses Beispiel funktioniert, muss "rect1" eine Farbverlaufsfüllung aufweisen.

Dim intVariant As Integer 
 
With ActiveDocument.Pages(1).Shapes 
 ' Store gradient variant of rect1. 
 intVariant = .Item("rect1").Fill.GradientVariant 
 ' Add new rectangle. 
 With .AddShape(Type:=msoShapeRectangle, _ 
 Left:=0, Top:=0, Width:=40, Height:=80).Fill 
 ' Set color and gradient of new rectangle. 
 .ForeColor.RGB = RGB(128, 0, 0) 
 .OneColorGradient Style:=msoGradientHorizontal, _ 
 Variant:=intVariant, Degree:=1 
 End With 
End With 

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.