Smart questions
Smart answers
Smart people
INTELLIGENT WORK FORUMS
FOR COMPUTER PROFESSIONALS

Member Login

Come Join Us!

Are you a
Computer / IT professional?
Join Tek-Tips now!
  • Talk With Other Members
  • Be Notified Of Responses
    To Your Posts
  • Keyword Search
  • One-Click Access To Your
    Favorite Forums
  • Automated Signatures
    On Your Posts
  • Best Of All, It's Free!

Join Tek-Tips
*Tek-Tips's functionality depends on members receiving e-mail. By joining you are opting in to receive e-mail.

LINK TO THIS FORUM!

Add Stickiness To Your Site By Linking To This Professionally Managed Technical Forum.
Just copy and paste the
code below into your site.

Partner With Us!

"Best Of Breed" Forums Add Stickiness To Your Site
Partner Button
(Download This Button Today!)

Feedback

"...I don't think testimonials would have enticed me to become a member, or even use the site for that matter. I use the site for a learning experience..."

Geography

Where in the world do Tek-Tips members come from?

exporting (save) document with a macro on corel X5

monteiro99 (TechnicalUser)
26 Apr 11 6:43
Hi, this is my first forum so sorry if i didn't put in the correct place, this is what i want to do, i have a template where i run several macros to do several things however i have tried to create a macro to export the final design with custom size and the macro wont run, is there a way of doing it?

many thanks in advance.

Jorge
kphu (MIS)
26 May 11 13:45
I'm on X4 but X5 shuold have the same vba capabilities. Here's a sample code that should help...note the drawback of this functionality is that the file name and directory must be hardcoded or other codes needs to be introduced in order to get the user to put the directory and file name.

CODE

Sub ExportToWinLase()
    ' Recorded 5/13/2011
    ' Saves file as .plt
    Dim savetopath As String
    Dim expopt As StructExportOptions
    'Dim yn As String
        
    Set expopt = CreateStructExportOptions
    expopt.UseColorProfile = False
    
    Dim expflt As ExportFilter
 
    Set expflt = ActiveDocument.ExportEx("c:\test.plt", cdrHPGL, cdrAllPages, expopt)
    expflt.ShowDialog
    expflt.Finish
    
End Sub

Also, you can find this information in the vba programming guide for X5 which should be located in the following path of your machine.

C:\Program Files\Corel\CorelDRAW Graphics Suite X4\Programs\dvba_pg.pdf

Good luck



 

Reply To This Thread

Posting in the Tek-Tips forums is a member-only feature.

Click Here to join Tek-Tips and talk with other members!

Back To Forum

Close Box

Join Tek-Tips® Today!

Join your peers on the Internet's largest technical computer professional community.
It's easy to join and it's free.

Here's Why Members Love Tek-Tips Forums:

Register now while it's still free!

Already a member? Close this window and log in.

Join Us             Close