Save a file always as an earlier version

Hi,

is there a way that CorelDRAW saves the files always for a previous version? E.g. I have X8 and want to save it in X6.

I know I can do that with the 'Save as..' dialog manually each time but I couldn't find that for the most often [CTRL] + S command.

Kaysimops

Parents
No Data
Reply
  • Use a macro

    Sub SaveAsX8()
    Dim Path As String
    Dim Name As String
    Path = ActiveDocument.FilePath
    Name = ActiveDocument.FileName

    Dim SaveOptions As StructSaveAsOptions
    Set SaveOptions = CreateStructSaveAsOptions
    With SaveOptions
    .EmbedVBAProject = True
    .Filter = cdrCDR
    .IncludeCMXData = False
    .Range = cdrAllPages
    .EmbedICCProfile = False
    .Version = cdrVersion18
    End With

    ActiveDocument.SaveAs Path + "\" + Name, SaveOptions
    End Sub

Children