FillFormat.GradientStyle-Eigenschaft (Publisher)

Gibt eine MsoGradientStyle-Konstante zurück, die den Farbverlaufsstil für die angegebene Füllung angibt. Schreibgeschützt.

Syntax

Ausdruck. GradientStyle

Ausdruck Eine Variable, die ein FillFormat-Objekt darstellt.

Rückgabewert

MsoGradientStyle

HinwBemerkungeneise

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

Wenn Sie versuchen, diese Eigenschaft für eine Füllung zurückzugeben, die keinen Farbverlauf aufweist, tritt ein Fehler auf. Ermitteln Sie mithilfe der Type -Eigenschaft, ob die Füllung einen Farbverlauf aufweist.

Der Wert der GradientStyle -Eigenschaft kann eine der in der Microsoft Office-Typbibliothek deklarierten MsoGradientStyle -Konstanten sein.

Beispiel

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

Dim intStyle As Integer 
 
With ActiveDocument.Pages(1).Shapes 
 ' Store gradient style of rect1. 
 intStyle = .Item("rect1").Fill.GradientStyle 
 ' 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:=intStyle, _ 
 Variant:=1, 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.