一、DefaultWebOptions 对象
包含全局的应用程序级属性；当将整个或部分演示文稿作为 Web 页发布或保存，或打开 Web 页时，Microsoft PowerPoint 会使用这些属性。用户可以在应用程序（全局）级或演示文稿级返回或设置属性。（请注意，不同演示文稿的属性值可能不同，这取决于保存演示文稿时的属性值。）演示文稿级的属性设置会覆盖应用程序级的属性设置。演示文稿级的属性包含在 WebOptions 对象中。
使用 DefaultWebOptions 对象
使用 DefaultWebOptions 属性可返回 DefaultWebOptions 对象。以下示例将检查是否可以将 PNG（可移植网络图形）作为图像格式，然后相应地设置 strImageFileType 变量。
Set objAppWebOptions = Application.DefaultWebOptions
With objAppWebOptions
If .AllowPNG = True Then
strImageFileType = "PNG"
Else
strImageFileType = "JPG"
End If
End With
二、Design 对象
Design 对象是 Designs 和 SlideRange 集合以及 Master 和 Slide 对象的成员。
使用 Design 对象
使用 Master、Slide 或 SlideRange 对象的 Design 属性访问 Design 对象，例如：
ActivePresentation.SlideMaster.Design
ActivePresentation.Slides(1).Design
ActivePresentation.Slides.Range.Design
分别使用 Designs 集合的 Add、Item、Clone 或 Load 方法添加、引用、复制或加载一个 Design 对象。例如，若要添加一个设计模板，请使用 ActivePresentation.Designs.Add designName:="MyDesign"
Design 对象的 AddTitleMaster 方法和 HasTitleMaster 属性可以用来添加和/或查询标题幻灯片母版的状态。例如：
Sub AddQueryTitleMaster(dsn As Design)
dsn.AddTitleMaster
MsgBox dsn.HasTitleMaster
End Sub
三、Designs 集合
若要添加或复制单个的设计模板，请分别使用 Designs 集合的 Add 或 Clone 方法。若要引用单个的设计模板，请使用 Item 方法。
若要加载一个设计模板，请使用 Load 方法。
以下示例在 Designs 集合中添加一个新设计模板并确认新模板已正确添加。
Sub AddDesignMaster()
With ActivePresentation.Designs
.Add designName:="MyDesignName"
MsgBox .Item("MyDesignName").Name
End With
End Sub