Примечание.
Для доступа к этой странице требуется авторизация. Вы можете попробовать войти или изменить каталоги.
Для доступа к этой странице требуется авторизация. Вы можете попробовать изменить каталоги.
Заливка фигуры должна соответствовать фону слайда. Если изменить фон слайда после применения этого метода к заливке, изменится и заливка.
Синтаксис
выражение. История вопроса
выражение Переменная, представляющая объект FillFormat .
Примечания
Обратите внимание, что применение метода фона к заливке фигуры отличается от настройки прозрачной заливки для фигуры, а также не всегда то же самое, что применение к фигуре той же заливки, что и к фону. Это показано во втором примере.
Пример
В данном примере заливка первой фигуры на первом слайде активной презентации задается в соответствии с фоном слайда.
ActivePresentation.Slides(1).Shapes(1).Fill.Background
В этом примере в качестве фона первого слайда активной презентации задается заданный градиент, на слайд добавляется прямоугольник, а затем перед прямоугольником помещаются три овала. К первому овалу применена заливка, соответствующая фону слайда, ко второму — прозрачная заливка, а к третьему применена та же заливка, что и к фону. Обратите внимание на разницу во внешнем виде этих трех овалов.
With ActivePresentation.Slides(1)
.FollowMasterBackground = False
.Background.Fill.PresetGradient _
msoGradientHorizontal, 1, msoGradientDaybreak
With .Shapes
.AddShape msoShapeRectangle, 50, 200, 600, 100
.AddShape(msoShapeOval, 75, 150, 150, 100) _
.Fill.Background
.AddShape(msoShapeOval, 275, 150, 150, 100).Fill _
.Transparency = 1
.AddShape(msoShapeOval, 475, 150, 150, 100) _
.Fill.PresetGradient _
msoGradientHorizontal, 1, msoGradientDaybreak
End With
End With
См. также
Поддержка и обратная связь
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.