PowerPoint VBA教程:Background方法

指定形状的填充与幻灯片背景相匹配。如果将此方法应用于填充后又更改了幻灯片背景色,该填充会随之改变。

说明

请注意,将 Background方法应用于形状的填充与设置该形状的透明填充不完全相同,也不完全等同于将形状填充设为与背景相同。请参见第二个示例。

VBA示例

本示例将活动演示文稿第一张幻灯片第一个形状的填充设为与幻灯片背景相匹配。


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

上页:PowerPoint VBA教程:AutomaticLength方法 下页:PowerPoint VBA教程:BeginConnect方法

PowerPoint VBA教程:Background方法

PowerPoint VBA教程:BeginConnect方法 PowerPoint VBA教程:BeginDisconnect方法
PowerPoint VBA教程:BuildFreeform方法 PowerPoint VBA教程:CanCheckIn方法
PowerPoint VBA教程:CanCheckOut方法 PowerPoint VBA教程:Cell方法
PowerPoint VBA教程:ChangeCase方法 PowerPoint VBA教程:Characters方法
PowerPoint VBA教程:CheckIn方法 PowerPoint VBA教程:CheckOut方法
PowerPoint VBA教程:Clear方法 PowerPoint VBA教程:ClearAll方法
PowerPoint VBA教程:Clone方法 PowerPoint VBA教程:CloneNode方法
PowerPoint VBA教程:Close方法 PowerPoint VBA教程:Colors方法
PowerPoint VBA教程:Convert方法 PowerPoint VBA教程:ConvertToAfterEffect方法
PowerPoint VBA教程:ConvertToAnimateBackground方法 PowerPoint VBA教程:ConvertToAnimateInReverse方法
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号