PowerPoint) (FillFormat.PresetGradientType 屬性
會傳回指定之填滿的預設漸層類型。 唯讀。
語法
運算式。PresetGradientType
表達 代表 FillFormat 物件的 變數。
傳回值
MsoPresetGradientType
註解
使用 PresetGradient 方法可設定填滿的預設漸層類型。
PresetGradientType 屬性的值可以是下列其中一個 MsoPresetGradientType 常數。
| msoGradientBrass |
| msoGradientCalmWater |
| msoGradientChrome |
| msoGradientChromeII |
| msoGradientDaybreak |
| msoGradientDesert |
| msoGradientEarlySunset |
| msoGradientFire |
| msoGradientFog |
| msoGradientGold |
| msoGradientGoldII |
| msoGradientHorizon |
| msoGradientLateSunset |
| msoGradientMahogany |
| msoGradientMoss |
| msoGradientNightfall |
| msoGradientOcean |
| msoGradientParchment |
| msoGradientPeacock |
| msoGradientRainbow |
| msoGradientRainbowII |
| msoGradientSapphire |
| msoGradientSilver |
| msoGradientWheat |
| msoPresetGradientMixed |
範例
本範例會變更 myDocument 中所有圖案的填滿，將 Moss 預設漸層填滿變更為 Fog 預設漸層填滿。
Set myDocument = ActivePresentation.Slides(1)
For Each s In myDocument.Shapes
With s.Fill
If .PresetGradientType = msoGradientMoss Then
.PresetGradient = msoGradientFog
End If
End With
Next
另請參閱
支援和意見反應
有關於 Office VBA 或這份文件的問題或意見反應嗎？ 如需取得支援服務並提供意見反應的相關指導，請參閱 Office VBA 支援與意見反應。