Свойство FillFormat.GradientVariant (Word)

Статья
04/07/2023

Возвращает вариант градиента для указанной заливки в виде целочисленного значения от 1 до 4 для большинства градиентных заливок. Только для чтения, Long.

Синтаксис

expression. GradientVariant

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

Замечания

Если стиль градиента — msoGradientFromCenter, это свойство возвращает значение 1 или 2. Значения этого свойства соответствуют вариантам градиента (нумерованным слева направо и сверху вниз) на вкладке Градиент в диалоговом окне Эффекты заливки .

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

Пример

В этом примере к активному документу добавляется прямоугольник и устанавливается его вариант градиента заливки в соответствии с вариантом фигуры с именем rect1. Чтобы пример работал, rect1 должен иметь градиентную заливку.

Dim lngGradient As Long 
 
With ActiveDocument.Shapes 
 lngGradient = .Item("rect1").Fill.GradientVariant 
 With .AddShape(msoShapeRectangle, 0, 0, 40, 80).Fill 
 .ForeColor.RGB = RGB(128, 0, 0) 
 .OneColorGradient msoGradientHorizontal, _ 
 lngGradient, 1 
 End With 
End With

См. также

Объект FillFormat

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

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

Поделиться через