本示例以文件名“重新保存.ppt”保存当前演示文稿的一个副本。

Application.ActivePresentation.SaveAs "重新保存.dps"