FillFormat.GradientColorType 属性 (Publisher)

返回一个 MsoGradientColorType 常量，该常量指示指定填充的渐变颜色类型。 此为只读属性。

语法

表达式。GradientColorType

表达 一个代表 FillFormat 对象的变量。

返回值

MsoGradientColorType

备注

使用 属性 、 只读 或 TwoColorGradient 方法设置填充的渐变类型。

GradientColorType 属性值可以是 Microsoft Office 类型库中声明的 MsoGradientColorType 常量之一。

示例

本示例将当前出版物的第一页上的具有双色渐变填充的所有形状的填充更改为预设渐变填充。

Dim shpLoop As Shape 
 
' Loop through collection of shapes. 
For Each shpLoop In ActiveDocument.Pages(1).Shapes 
 With shpLoop.Fill 
 ' Test for two-color gradient. 
 If .GradientColorType = msoGradientTwoColors Then 
 ' Apply a preset gradient. 
 .PresetGradient Style:=msoGradientHorizontal, _ 
 Variant:=1, PresetGradientType:=msoGradientBrass 
 End If 
 End With 
Next shpLoop 

支持和反馈

有关于 Office VBA 或本文档的疑问或反馈？ 请参阅 Office VBA 支持和反馈，获取有关如何接收支持和提供反馈的指南。