ChartFillFormat.PresetGradient Method
Sets the specified fill to a preset gradient.
Namespace: Microsoft.Office.Interop.PowerPoint
Assembly: Microsoft.Office.Interop.PowerPoint (in Microsoft.Office.Interop.PowerPoint.dll)
Syntax
'Declaration
Sub PresetGradient ( _
Style As MsoGradientStyle, _
Variant As Integer, _
PresetGradientType As MsoPresetGradientType _
)
'Usage
Dim instance As ChartFillFormat
Dim Style As MsoGradientStyle
Dim Variant As Integer
Dim PresetGradientType As MsoPresetGradientType
instance.PresetGradient(Style, Variant, _
PresetGradientType)
void PresetGradient(
MsoGradientStyle Style,
int Variant,
MsoPresetGradientType PresetGradientType
)
Parameters
- Style
Type: Microsoft.Office.Core.MsoGradientStyle
The gradient style.
- Variant
Type: System.Int32
The gradient variant. Can be a value from 1 to 4, corresponding to the four variants on the Gradient subtab on the Shape Fill tab. If Style is msoGradientFromTitle or msoGradientFromCenter, this argument can be either 1 or 2.
- PresetGradientType
Type: Microsoft.Office.Core.MsoPresetGradientType
The gradient type.
Remarks
The Style parameter value can be one of these MsoGradientStyle constants.
msoGradientDiagonalDown |
msoGradientDiagonalUp |
msoGradientFromCenter |
msoGradientFromCorner |
msoGradientFromTitle |
msoGradientHorizontal |
msoGradientMixed |
msoGradientVertical |
The PresetGradientType parameter value can be one of these MsoPresetGradientType constants.
msoGradientBrass |
msoGradientCalmWater |
msoGradientChrome |
msoGradientChromeII |
msoGradientDaybreak |
msoGradientDesert |
msoGradientEarlySunset |
msoGradientFire |
msoGradientFog |
msoGradientGold |
msoGradientGoldII |
msoGradientHorizon |
msoGradientLateSunset |
msoGradientMahogany |
msoGradientMoss |
msoGradientNightfall |
msoGradientOcean |
msoGradientParchment |
msoGradientPeacock |
msoGradientRainbow |
msoGradientRainbowII |
msoGradientSapphire |
msoGradientSilver |
msoGradientWheat |
msoPresetGradientMixed |
Examples
This example adds a rectangle with a preset gradient fill to myDocument.
Set myDocument = ActivePresentation.Slides(1)
myDocument.Shapes.AddShape(msoShapeRectangle, 90, 90, 140, 80).Fill.PresetGradientmsoGradientHorizontal, 1, msoGradientBrass