FillFormat.PresetGradient method (Publisher)

Sets the specified fill to a preset gradient.

Syntax

expression.PresetGradient (Style, Variant, PresetGradientType)

expression A variable that represents a FillFormat object.

Parameters

Name Required/Optional Data type Description
Style Required MsoGradientStyle The style of the gradient. 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.
PresetGradientType Required MsoPresetGradientType The gradient type. Can be one of the MsoPresetGradientType constants.

Example

This example adds a rectangle with a preset gradient fill to the active publication.

ActiveDocument.Pages(1).Shapes _ 
 .AddShape(msoShapeRectangle, 90, 90, 140, 80) _ 
 .Fill.PresetGradient Style:=msoGradientHorizontal, _ 
 Variant:=1, PresetGradientType:=msoGradientBrass 

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.