ChartFillFormat.TwoColorGradient Method
Sets the specified fill to a two-color gradient.
Namespace: Microsoft.Office.Interop.PowerPoint
Assembly: Microsoft.Office.Interop.PowerPoint (in Microsoft.Office.Interop.PowerPoint.dll)
Syntax
'Declaration
Sub TwoColorGradient ( _
Style As MsoGradientStyle, _
Variant As Integer _
)
'Usage
Dim instance As ChartFillFormat
Dim Style As MsoGradientStyle
Dim Variant As Integer
instance.TwoColorGradient(Style, Variant)
void TwoColorGradient(
MsoGradientStyle Style,
int Variant
)
Parameters
- Style
Type: Microsoft.Office.Core.MsoGradientStyle
The gradient style.
- Variant
Type: System.Int32
The gradient variant.
Remarks
The Style parameter value can be one of these MsoGradientStyle constants.
msoGradientDiagonalDown |
msoGradientDiagonalUp |
msoGradientFromCenter |
msoGradientFromCorner |
msoGradientFromTitle |
msoGradientHorizontal |
msoGradientMixed |
msoGradientVertical |
The Variant parameter value 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.
Examples
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)
.TwoColorGradientStyle:=msoGradientHorizontal, Variant:=1
End With