Share via


FillFormat.OneColorGradient Method

Publisher Developer Reference

Sets the specified fill to a one-color gradient.

Syntax

expression.OneColorGradient(Style, Variant, Degree)

expression   A variable that represents a FillFormat object.

Parameters

Name Required/Optional Data Type Description
Style Required MsoGradientStyle The gradient style.
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).

Remarks

The Style parameter can be one of the MsoGradientStyle constants declared in the Microsoft Office type library and shown in the following table.

msoGradientDiagonalDown
msoGradientDiagonalUp
msoGradientFromCenter
msoGradientFromCorner
msoGradientFromTitle
msoGradientHorizontal
msoGradientVertical

Example

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

Visual Basic for Applications
  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

See Also