将指定填充设置为预设过渡。
expression.PresetGradient(Style, Variant, PresetGradientType)
expression 必需。该表达式返回“应用于”列表中的对象之一。
Style MsoGradientStyle 类型，必需。指定填充的过渡样式。
MsoGradientStyle 可为以下 MsoGradientStyle 常量之一。 |
msoGradientDiagonalDown |
msoGradientDiagonalUp |
msoGradientFromCenter |
msoGradientFromCorner |
msoGradientFromTitle |
msoGradientHorizontal |
msoGradientMixed |
msoGradientVertical |
Variant Long 类型，必需。指定填充的过渡变量，可为 1 到 4 之间的值，对应于“填充效果”对话框的“过渡”选项卡上所列出的四个变量。但如果 Style 为 msoGradientFromCenter，那么 Variant 参数就只能为 1 或 2。
PresetGradientType 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 |
示例
本示例将图表的填充格式设置为预设的黄铜颜色。
With myChart.ChartArea.Fill
.Visible = True
.PresetGradient msoGradientDiagonalDown, 3, msoGradientBrass
End With