TwoColorGradient Method

Applies To

FillFormat object.

Description

Sets the specified fill to a two-color gradient.

Syntax

expression.TwoColorGradient(Style, Variant)

expression Required. An expression that returns a FillFormat object.

Style Required Long. The gradient style. Can be one of the following MsoGradientStyle constants: msoGradientDiagonalDown, msoGradientDiagonalUp, msoGradientFromCenter, msoGradientFromCorner, msoGradientFromTitle, msoGradientHorizontal, or 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 msoGradientFromTitle or msoGradientFromCenter, this argument can be either 1 or 2.

See Also

Background method, GradientColorType property, GradientStyle property, GradientVariant property, OneColorGradient method, Patterned method, PresetGradient method, PresetTextured method, Solid method, UserTextured method.

Example

This example adds a rectangle with a two-color gradient fill to myDocument and sets the background and foreground color for the fill.

Set myDocument = ActivePresentation.Slides(1)
With myDocument.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