返回指定填充的预设过渡样式。MsoPresetGradientType 类型，只读。
| MsoPresetGradientType 可为以下 MsoPresetGradientType 常量之一。 |
| msoGradientBrass |
| msoGradientChrome |
| msoGradientDaybreak |
| msoGradientEarlySunset |
| msoGradientFog |
| msoGradientGoldII |
| msoGradientLateSunset |
| msoGradientMoss |
| msoGradientOcean |
| msoGradientPeacock |
| msoGradientRainbowII |
| msoGradientSilver |
| msoGradientWheat |
| msoPresetGradientMixed |
| msoGradientCalmWater |
| msoGradientChromeII |
| msoGradientDesert |
| msoGradientFire |
| msoGradientGold |
| msoGradientHorizon |
| msoGradientMahogany |
| msoGradientNightfall |
| msoGradientParchment |
| msoGradientRainbow |
| msoGradientSapphire |
expression.PresetGradientType
expression 必需。该表达式返回“应用于”列表中的对象之一。
可用 PresetGradient 方法设置填充格式的预置颜色过渡类型。
本示例以第一个图表中使用的填充格式对第二个图表的填充格式进行设置。
Set c1f = Charts(1).ChartArea.Fill
If c1f.Type = msoFillGradient Then
With Charts(2).ChartArea.Fill
.Visible = True
.PresetGradient c1f.GradientStyle, _
c1f.GradientVariant, c1f.PresetGradientType
End With
End If