FillFormat.OneColorGradient method (Publisher)

Sets the specified fill to a one-color gradient.


expression.OneColorGradient (Style, Variant, Degree)

expression A variable that represents a FillFormat object.


Name Required/Optional Data type Description
Style Required MsoGradientStyle The gradient style. Can be one of the MsoGradientStyle constants declared in the Microsoft Office type library.
Variant Required Long The gradient variant. Can be a value from 1 to 4, corresponding to the four variants on the Gradient tab in the Fill Effects dialog box. If Style is msoGradientFromTitle or msoGradientFromCenter, this argument can be either 1 or 2.
Degree Required Single The gradient degree. Can be a value from 0.0 (dark) to 1.0 (light).


This example adds a rectangle with a one-color gradient fill to the active publication.

With ActiveDocument.Pages(1).Shapes _ 
 .AddShape(Type:=msoShapeRectangle, _ 
 Left:=90, Top:=90, Width:=90, Height:=80).Fill 
 .ForeColor.RGB = RGB(0, 128, 128) 
 .OneColorGradient Style:=msoGradientHorizontal, _ 
 Variant:=1, Degree:=1 
End With 

Support and feedback

Have questions or feedback about Office VBA or this documentation? Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.