Publisher) (FillFormat.GradientColorType 屬性

會傳回指出指定填滿之漸層色彩類型的 MsoGradientColorType 常數。 唯讀。

語法

運算式。GradientColorType

表達 代表 FillFormat 物件的 變數。

傳回值

MsoGradientColorType

註解

使用 OneColorGradient 、 PresetGradient 或 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 支援與意見反應。