Свойство FillFormat.PresetGradientType (Publisher)

Возвращает константу MsoPresetGradientType , представляющую предустановленный тип градиента для указанной заливки. Только для чтения.

Синтаксис

expression. PresetGradientType

Выражение Переменная, представляющая объект FillFormat .

Возвращаемое значение

MsoPresetGradientType

Замечания

Значение свойства PresetGradientType может быть одной из констант MsoPresetGradientType , объявленных в библиотеке типов Microsoft Office.

Используйте метод PresetGradient , чтобы задать предустановленный тип градиента для заливки.

Пример

В этом примере заливка для первой фигуры на первой странице активной публикации изменяется на предустановленную градиентную заливку Туман, если она еще не задана как предустановленный градиент Туман. В этом примере предполагается, что на первой странице активной публикации есть по крайней мере одна фигура.

Sub SetGradient() 
 With ActiveDocument.Pages(1).Shapes(1).Fill 
 If .PresetGradientType <> msoGradientFog Then 
 .PresetGradient Style:=msoGradientHorizontal, _ 
 Variant:=1, PresetGradientType:=msoGradientFog 
 End If 
 End With 
End Sub

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.