本示例选择当前演示文稿中的第一张幻灯片的所有形状。

ActivePresentation.Slides(1).Shapes.SelectAll