Saves the document
Syntax:
Sub Save()
Remarks:
The Save method saves the document to file.
Examples:
The following VBA 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 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 = cdrCurrentVersion
ActiveDocument.SaveAs "C:\Image9.cdr", opt

End Sub