Метод FillFormat.PresetGradient (Publisher)

Статья
04/07/2023

Задает для указанной заливки предустановленный градиент.

Синтаксис

expression. PresetGradient (Style, Variant, PresetGradientType)

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

Параметры

Имя	Обязательный или необязательный	Тип данных	Описание
Style	Обязательный	MsoGradientStyle	Стиль градиента. Может быть одной из констант MsoGradientStyle , объявленных в библиотеке типов Microsoft Office.
Variant	Обязательный	Long	Вариант градиента. Может быть значением от 1 до 4, соответствующим четырем вариантам на вкладке Градиент диалогового окна Эффекты заполнения . Если style имеет значение msoGradientFromTitle или msoGradientFromCenter, этот аргумент может иметь значение 1 или 2.
PresetGradientType	Обязательный	MsoPresetGradientType	Тип градиента. Может быть одной из констант MsoPresetGradientType .

Пример

В этом примере к активной публикации добавляется прямоугольник с предустановленной градиентной заливкой.

ActiveDocument.Pages(1).Shapes _ 
 .AddShape(msoShapeRectangle, 90, 90, 140, 80) _ 
 .Fill.PresetGradient Style:=msoGradientHorizontal, _ 
 Variant:=1, PresetGradientType:=msoGradientBrass

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

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