OneColorGradient 方法

将指定填充设为单色过渡。

expression.OneColorGradient(Style, Variant, Degree)

expression   必需。该表达式返回“应用于”列表中的对象之一。

Style MsoGradientStyle 类型,必需。指定填充的过渡样式。

MsoGradientStyle 可为以下 MsoGradientStyle 常量之一。

msoGradientDiagonalDown

msoGradientDiagonalUp

msoGradientFromCenter

msoGradientFromCorner

msoGradientFromTitle

msoGradientHorizontal

msoGradientMixed

msoGradientVertical

Variant   Long 类型,必需。指定填充的过渡变量,可为 1 到 4 之间的一个值,对应于“填充效果”对话框的“过渡”选项卡上所列出的四个变量。但如果 StylemsoGradientFromCenter,那么 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