Свойство FillFormat.GradientStyle (PowerPoint)
Возвращает стиль градиента для указанной заливки. Только для чтения.
Синтаксис
expression. GradientStyle
Выражение Переменная, представляющая объект FillFormat .
Возвращаемое значение
MsoGradientStyle
Замечания
Используйте методы OneColorGradient, PresetGradient или TwoColorGradient , чтобы задать стиль градиента для заливки. Попытка вернуть это свойство для заливки без градиента приводит к ошибке. Используйте свойство Type , чтобы определить, имеет ли заливка градиент.
Значение, возвращаемое свойством GradientStyle, может быть одной из этих констант MsoGradientStyle .
msoGradientDiagonalDown |
msoGradientDiagonalUp |
msoGradientFromCenter |
msoGradientFromCorner |
msoGradientFromTitle |
msoGradientHorizontal |
msoGradientMixed |
msoGradientVertical |
Пример
В этом примере в myDocument добавляется прямоугольник и устанавливается стиль градиента заливки в соответствии с стилем фигуры с именем rect1. Чтобы пример работал, rect1 должен иметь градиентную заливку.
Set myDocument = ActivePresentation.Slides(1)
With myDocument.Shapes
gradStyle1 = .Item("rect1").Fill.GradientStyle
With .AddShape(msoShapeRectangle, 0, 0, 40, 80).Fill
.ForeColor.RGB = RGB(128, 0, 0)
.OneColorGradient gradStyle1, 1, 1
End With
End With
См. также
Поддержка и обратная связь
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.