Saves a copy of the specified presentation to a file without modifying the original.
expression.SaveCopyAs(FileName, FileFormat, EmbedTrueTypeFonts)
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. The file format.
| PpSaveAsFileType can be one of these PpSaveAsFileType constants. |
| ppSaveAsHTMLv3 |
| ppSaveAsAddIn |
| ppSaveAsBMP |
| ppSaveAsDefault default |
| ppSaveAsGIF |
| ppSaveAsHTML |
| ppSaveAsHTMLDual |
| ppSaveAsJPG |
| ppSaveAsMetaFile |
| ppSaveAsPNG |
| ppSaveAsPowerPoint3 |
| ppSaveAsPowerPoint4 |
| ppSaveAsPowerPoint4FarEast |
| ppSaveAsPowerPoint7 |
| ppSaveAsPresentation |
| ppSaveAsRTF |
| ppSaveAsShow |
| ppSaveAsTemplate |
| ppSaveAsTIF |
| ppSaveAsWebArchive |
EmbedTrueTypeFonts Optional MsoTriState. Specifies whether TrueType fonts are embedded.
| MsoTriState can be one of these MsoTriState constants. |
| msoCTrue |
| msoFalse |
| msoTriStateMixed default |
| msoTriStateToggle |
| msoTrue |
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