SaveAs 方法

       

保存未保存过的演示文稿,或以其他文件名保存已保存过的演示文稿。

expression.SaveAs(Filename, FileFormat, EmbedFonts)

expression  必选。该表达式返回一个 Presentation 对象。

Filename  必选。String 类型。指定文件的存盘名称。如果未指定完整路径名,PowerPoint 将该文件存于当前文件夹。

FileFormat  可选。PpSaveAsFileType 类型。指定保存的文件格式。如果省略此参数,文件以 PowerPoint 当前版本中演示文稿的格式保存 (ppSaveAsPresentation)。

EmbedFonts  可选。MsoTriState 类型。指定 PowerPoint 是否将 TrueType 字体嵌入保存的演示文稿。

示例

本示例以文件名“New Format Copy.ppt”保存当前演示文稿的一个副本。默认情况下,该副本以当前版本的 PowerPoint 演示文稿格式保存,然后以文件名“Old Format Copy”另存为 PowerPoint 4.0 格式文件。

With Application.ActivePresentation
    .SaveCopyAs "New Format Copy"
    .SaveAs "Old Format Copy", ppSaveAsPowerPoint4
End With