保存未保存过的演示文稿,或以其他文件名保存已保存过的演示文稿。
expression.SaveAs(Filename, FileFormat, EmbedFonts)
expression 必选。该表达式返回一个 Presentation 对象。
Filename 必选。String 类型。指定文件的存盘名称。如果未指定完整路径名,PowerPoint 将该文件存于当前文件夹。
FileFormat 可选。PpSaveAsFileType 类型。指定保存的文件格式。如果省略此参数,文件以 PowerPoint 当前版本中演示文稿的格式保存 (ppSaveAsPresentation)。
| PpSaveAsFileType 可以是下列 PpSaveAsFileType 类型常数之一。 | 
| ppSaveAsHTMLv3 | 
| ppSaveAsAddIn | 
| ppSaveAsBMP | 
| ppSaveAsDefault | 
| ppSaveAsGIF | 
| ppSaveAsHTML | 
| ppSaveAsHTMLDual | 
| ppSaveAsJPG | 
| ppSaveAsMetaFile | 
| ppSaveAsPNG | 
| ppSaveAsPowerPoint3 | 
| ppSaveAsPowerPoint4 | 
| ppSaveAsPowerPoint4FarEast | 
| ppSaveAsPowerPoint7 | 
| ppSaveAsPresentation 默认值。 | 
| ppSaveAsRTF | 
| ppSaveAsShow | 
| ppSaveAsTemplate | 
| ppSaveAsTIF | 
| ppSaveAsWebArchive | 
EmbedFonts 可选。MsoTriState 类型。指定 PowerPoint 是否将 TrueType 字体嵌入保存的演示文稿。
| MsoTriState 可以是下列 MsoTriState 类型常数之一。 | 
| msoCTrue | 
| msoFalse | 
| msoTriStateMixed 默认值。 | 
| msoTriStateToggle | 
| msoTrue 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