GradientColorType 属性

返回指定填充的过渡颜色类型。该属性为只读。使用 OneColorGradient、PresetGradient 或 TwoColorGradient 方法设置填充的过渡类型。只读。MsoGradientColorType 类型。

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

示例

本示例将 myDocument 中使用双色过渡填充的所有形状的填充更改为预设的过渡填充。

Set myDocument = ActivePresentation.Slides(1)
For Each s In myDocument.Shapes
    With s.Fill
        If .GradientColorType = msoGradientTwoColors Then
            .PresetGradient msoGradientHorizontal, _
                1, msoGradientBrass
        End If
    End With
Next