3.3幻灯片母版

使用幻灯片母版，可以快速给演示文稿中的每个幻灯片添加相同的样式或内容。比如，给幻灯片母版右上角添加一个Logo，可以快速给每个幻灯片右上角添加一个Logo。

引用Presentation对象的SlideMaster属性可以返回幻灯片母版对象，利用该对象的属性和方法进一步对幻灯片母版进行设置。

下面对幻灯片母版进行背景色填充，并在幻灯片母版上添加一个圆形区域。

code.vba 
Sub Test()
  Dim pr As Presentation
  Set pr = Presentations.Open("D:\test.pptx")
  Dim mt As Object
  Set mt = pr.SlideMaster
  mt.Background.Fill.PresetGradient 3, 1, 2
  mt.Shapes.AddShape 9, 100, 100, 100, 100
End Sub

现在演示文稿的显示效果如图3-1所示。

Document Image

图3-1 幻灯片母版设置