Sets the specified fill to a one-color gradient.

Syntax

expression.OneColorGradient(Style, Variant, Degree)

expression A variable that represents an 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 Shape Fill tab. 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

MsoGradientStyle can be one of these MsoGradientStyle constants.
msoGradientDiagonalDown
msoGradientDiagonalUp
msoGradientFromCenter
msoGradientFromCorner
msoGradientFromTitle
msoGradientHorizontal
msoGradientMixed
msoGradientVertical

Example

This example adds a rectangle with a one-color gradient fill to myDocument.

Visual Basic for Applications 
Set myDocument = ActivePresentation.Slides(1) With myDocument.Shapes _ .AddShape(msoShapeRectangle, 90, 90, 90, 80).Fill .ForeColor.RGB = RGB(0, 128, 128) .OneColorGradient msoGradientHorizontal, 1, 1 End With
Apply one color gradient? Make the style of gradient a one color type? one one color gradient One Color Gradient Method onecolor OneColorGradient onecolorgradient method

See also: