将指定填充设为单色过渡。
expression.OneColorGradient(Style, Variant, Degree)
expression 必需。该表达式返回“应用于”列表中的对象之一。
Style MsoGradientStyle 类型，必需。指定填充的过渡样式。
| MsoGradientStyle 可为以下 MsoGradientStyle 常量之一。 |
| msoGradientDiagonalDown |
| msoGradientDiagonalUp |
| msoGradientFromCenter |
| msoGradientFromCorner |
| msoGradientFromTitle |
| msoGradientHorizontal |
| msoGradientMixed |
| msoGradientVertical |
Variant Long 类型，必需。指定填充的过渡变量，可为 1 到 4 之间的一个值，对应于“填充效果”对话框的“过渡”选项卡上所列出的四个变量。但如果 Style 为 msoGradientFromCenter，那么 Variant 参数就只能为 1 或 2。
Degree Single 类型，必需。指定填充的过渡程度。可为 0.0（表示最深）到 1.0（表示最浅）之间的值。
本示例设置图表的填充格式。
With myChart.ChartArea.Fill
If .Type = msoFillGradient Then
If .GradientColorType = msoGradientOneColor Then
.OneColorGradient Style:=msoGradientFromCorner, _
Variant:=1, Degree:=0.3
End If
End If
End With