title | keywords | f1_keywords | api_name | ms.assetid | ms.date | ms.localizationpriority | ||
---|---|---|---|---|---|---|---|---|
FillFormat.TwoColorGradient method (PowerPoint) |
vbapp10.chm552008 |
|
|
29dac3d9-366e-0fd5-0fe3-dc64fa2fc871 |
06/08/2017 |
medium |
Sets the specified fill to a two-color gradient.
expression.TwoColorGradient (Style, Variant)
expression A variable that represents a FillFormat object.
Name | Required/Optional | Data type | Description |
---|---|---|---|
Style | Required | MsoGradientStyle | The gradient style. |
Variant | Required | Long | The gradient variant. Can be from 1 to 4, corresponding to the four variants on the Gradient sub-tab on the Shape Fill tab. If Style is msoGradientFromTitle or msoGradientFromCenter, this argument can be either 1 or 2. |
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(Type:=msoShapeRectangle, Left:=0, _
Top:=0, Width:=40, Height:=80).Fill
.ForeColor.RGB = RGB(Red:=128, Green:=0, Blue:=0)
.BackColor.RGB = RGB(Red:=0, Green:=170, Blue:=170)
.TwoColorGradient Style:=msoGradientHorizontal, Variant:=1
End With
[!includeSupport and feedback]