Примечание.
Для доступа к этой странице требуется авторизация. Вы можете попробовать войти или изменить каталоги.
Для доступа к этой странице требуется авторизация. Вы можете попробовать изменить каталоги.
Возвращает вариант градиента для указанной заливки как целое значение от 1 до 4 для большинства градиентных заливок. Только для чтения.
Синтаксис
выражение. GradientVariant
выражение Переменная, представляющая объект FillFormat .
Возвращаемое значение
Long
Примечания
Если используется стиль градиента msoGradientFromTitle или msoGradientFromCenter, это свойство возвращает 1 или 2.
Значения этого свойства соответствуют вариантам градиента (пронумерованы слева направо и сверху вниз) на вложенной вкладке "Градиент " на вкладке "Заливка фигуры ". Длинная.
Это свойство доступно только для чтения. Чтобы задать вариант градиента для заливки, используйте методы OneColorGradient, PresetGradient или TwoColorGradient .
Пример
В этом примере в myDocument добавляется прямоугольник, в котором его вариант градиента заливки задается в соответствии с вариантом градиента фигуры с именем "rect1". Чтобы пример работал, прямоугольник1 должен иметь градиентную заливку.
Set myDocument = ActivePresentation.Slides(1)
With myDocument.Shapes
gradVar1 = .Item("rect1").Fill.GradientVariant
With .AddShape(msoShapeRectangle, 0, 0, 40, 80).Fill
.ForeColor.RGB = RGB(128, 0, 0)
.OneColorGradient msoGradientHorizontal, gradVar1, 1
End With
End With
См. также
Поддержка и обратная связь
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.