Presentation.SaveCopyAs method (PowerPoint)
Saves a copy of the specified presentation to a file without modifying the original.
Syntax
expression. SaveCopyAs( _FileName_, _FileFormat_, _EmbedTrueTypeFonts_ )
expression A variable that represents a Presentation object.
Parameters
| Name | Required/Optional | Data type | Description |
|---|---|---|---|
| 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. |
| EmbedTrueTypeFonts | Optional | MsoTriState | Specifies whether TrueType fonts are embedded. |
Remarks
The FileFormat parameter value can be one of these PpSaveAsFileType constants. The default is ppSaveAsDefault.
| ppSaveAsHTMLv3 |
| ppSaveAsAddIn |
| ppSaveAsBMP |
| ppSaveAsDefault |
| ppSaveAsGIF |
| ppSaveAsHTML |
| ppSaveAsHTMLDual |
| ppSaveAsJPG |
| ppSaveAsMetaFile |
| ppSaveAsPNG |
| ppSaveAsPowerPoint3 |
| ppSaveAsPowerPoint4 |
| ppSaveAsPowerPoint4FarEast |
| ppSaveAsPowerPoint7 |
| ppSaveAsPresentation |
| ppSaveAsRTF |
| ppSaveAsShow |
| ppSaveAsTemplate |
| ppSaveAsTIF |
| ppSaveAsWebArchive |
The EmbedTrueTypeFonts parameter value can be one of these MsoTriState constants.
| Constant | Description |
|---|---|
| msoFalse | TrueType fonts are not embedded. |
| msoTriStateMixed | Embedded fonts are a mixture of TrueType and non-TrueType. The default. |
| msoTrue | TrueType fonts are embedded. |
If the presentation is not fully downloaded, this method fails and an error occurs. For more information about the Partial Documents, see Work with Partial Documents.
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
See also
Support and feedback
Have questions or feedback about Office VBA or this documentation? Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.