本示例在当前演示文稿的开始处添加一张包含标题占位符的幻灯片。

ActivePresentation.Slides.Add Index:=1, Layout:=wpLayoutTitleOnly

 

本示例在当前演示文稿的末尾添加一张空白幻灯片。

With ActivePresentation.Slides
    .Add Index:=.Count + 1, Layout:=wpLayoutBlank
End With