OneColorGradient Method

Microsoft Word Visual Basic

OneColorGradient Method

       

Sets the specified fill to a one-color gradient.

expression.OneColorGradient(Style, Variant, Degree)

expression   Required. An expression that returns a FillFormat object.

 Style  Required MsoGradientStyle. The gradient style.

MsoGradientStyle can be one of these MsoGradientStyle constants.
msoGradientDiagonalDown
msoGradientDiagonalUp
msoGradientFromCenter
msoGradientFromCorner
msoGradientFromTitle Used only in Microsoft PowerPoint.
msoGradientHorizontal
msoGradientMixed
msoGradientVertical

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 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).

Example

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

With ActiveDocument.Shapes.AddShape(msoShapeRectangle, _
        90, 90, 90, 80).Fill
    .ForeColor.RGB = RGB(0, 128, 128)
    .OneColorGradient msoGradientHorizontal, 1, 1
End With