|
|
Document.Save
Sub Save()
Member of Document
The Save method saves the document to file.
The following code example saves the document to the original file if the document has been modified. It then creates a copy of the document, saving it in the CorelDRAW 9 file format.
Sub Test() Dim opt As New StructSaveAsOptions If ActiveDocument.Dirty Then ActiveDocument.Save opt.EmbedICCProfile = False opt.EmbedVBAProject = True opt.Filter = cdrCDR opt.IncludeCMXData = False opt.Overwrite = True opt.Range = cdrAllPages opt.ThumbnailSize = cdr10KColorThumbnail opt.Version = cdrVersion9 ActiveDocument.SaveAs "C:\Image9.cdr", opt End Sub
|
|
|
|
Copyright 2007 Corel Corporation. All rights reserved.