SaveAs Method
Saves a presentation that's never been saved, or saves a previously saved presentation under a different name.
expression.SaveAs(Filename, FileFormat, EmbedFonts)
expression Required. An expression that returns a Presentation object.
Filename Required String. Specifies the name to save the file under. If you don't include a full path, PowerPoint saves the file in the current folder.
FileFormat Optional PpSaveAsFileType. Specifies the saved file format. If this argument is omitted, the file is saved in the format of a presentation in the current version of PowerPoint (ppSaveAsPresentation).
| PpSaveAsFileType can be one of these PpSaveAsFileType constants. |
| ppSaveAsHTMLv3 |
| ppSaveAsAddIn |
| ppSaveAsBMP |
| ppSaveAsDefault |
| ppSaveAsGIF |
| ppSaveAsHTML |
| ppSaveAsHTMLDual |
| ppSaveAsJPG |
| ppSaveAsMetaFile |
| ppSaveAsPNG |
| ppSaveAsPowerPoint3 |
| ppSaveAsPowerPoint4 |
| ppSaveAsPowerPoint4FarEast |
| ppSaveAsPowerPoint7 |
| ppSaveAsPresentation Default. |
| ppSaveAsRTF |
| ppSaveAsShow |
| ppSaveAsTemplate |
| ppSaveAsTIF |
| ppSaveAsWebArchive |
EmbedFonts Optional MsoTriState. Specifies whether PowerPoint embeds TrueType fonts in the saved presentation.
| MsoTriState can be one of these MsoTriState constants. |
| msoCTrue |
| msoFalse |
| msoTriStateMixed Default. |
| msoTriStateToggle |
| msoTrue PowerPoint embeds TrueType fonts in the saved presentation. |
Example
This example saves a copy of the active presentation under the name "New Format Copy.ppt." By default, this copy is saved in the format of a presentation in the current version of PowerPoint. The presentation is then saved as a PowerPoint 4.0 file named "Old Format Copy."
With Application.ActivePresentation
.SaveCopyAs "New Format Copy"
.SaveAs "Old Format Copy", ppSaveAsPowerPoint4
End With