Sets the specified fill to a two-color gradient.
expression.TwoColorGradient(Style, Variant)
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.
Example
This example adds a rectangle with a two-color gradient fill to the active document and sets the background and foreground color for the fill.
With ActiveDocument.Shapes.AddShape(msoShapeRectangle, _
0, 0, 40, 80).Fill
.ForeColor.RGB = RGB(128, 0, 0)
.BackColor.RGB = RGB(0, 170, 170)
.TwoColorGradient msoGradientHorizontal, 1
End With