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.
WithActiveDocument.Shapes.AddShape(msoShapeRectangle, _ 90, 90, 90, 80).Fill .ForeColor.RGB = RGB(0, 128, 128) .OneColorGradient msoGradientHorizontal, 1, 1 End With