FillFormat.PresetGradientType property (PowerPoint)
Returns the preset gradient type for the specified fill. Read-only.
Syntax
expression.PresetGradientType
expression A variable that represents a FillFormat object.
Return value
MsoPresetGradientType
Remarks
Use the PresetGradient method to set the preset gradient type for the fill.
The value of the PresetGradientType property 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 |
Example
This example changes the fill for all shapes in myDocument with the Moss preset gradient fill to the Fog preset gradient fill.
Set myDocument = ActivePresentation.Slides(1)
For Each s In myDocument.Shapes
With s.Fill
If .PresetGradientType = msoGradientMoss Then
.PresetGradient = msoGradientFog
End If
End With
Next
See also
Support and feedback
Have questions or feedback about Office VBA or this documentation? Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.