OberonPlace.com Forums  

Go Back   OberonPlace.com Forums > Developer Forums > VBA > CorelDRAW/Corel DESIGNER VBA

Reply
 
Thread Tools Search this Thread Display Modes
  #1  
Old 31-01-2012, 00:19
sajas_1975
Guest
 
Posts: n/a
Default macro executes on having given the orders to stamp a document

Hello, since I do in order that a macro executes on having given the orders to stamp a document?
Reply With Quote
  #2  
Old 31-01-2012, 07:09
shelbym's Avatar
shelbym shelbym is offline
Senior Member
 
Join Date: Nov 2002
Location: Cheyenne, WY
Posts: 1,787
Blog Entries: 11
Send a message via ICQ to shelbym Send a message via AIM to shelbym Send a message via MSN to shelbym Send a message via Yahoo to shelbym
Default Stamp

What do you mean my stamp the document?

-Shelby
Reply With Quote
  #3  
Old 31-01-2012, 07:59
sajas_1975
Guest
 
Posts: n/a
Default

Hi, sorry for my English ... I need this macro to run when you send a print

Sub ExportAllPages()
c = GetSetting("mySaveMacro", "preferences", "saveCount", 1)
c2 = Format(c, "000")

Dim p As Page

For Each p In ActiveDocument.Pages
p.Activate

With ActiveDocument.ExportBitmap( _
"c:\Control\ " & p.Index & _
IIf(Trim(p.Name) <> "" And Left(p.Name, 5) <> "Page ", " (" & p.Name & ")", "") & c2 & ".jpg", _
cdrJPEG, cdrCurrentPage, cdrRGBColorImage, , , 72, 72, cdrSupersampling, , , UseColorProfile:=True)

.Compression = 20: .Optimized = True: .SubFormat = 0: .Smoothing = 3

.Finish
SaveSetting "mySaveMacro", "preferences", "saveCount", c + 1
End With
Next
End Sub
Reply With Quote
  #4  
Old 02-02-2012, 13:39
shelbym's Avatar
shelbym shelbym is offline
Senior Member
 
Join Date: Nov 2002
Location: Cheyenne, WY
Posts: 1,787
Blog Entries: 11
Send a message via ICQ to shelbym Send a message via AIM to shelbym Send a message via MSN to shelbym Send a message via Yahoo to shelbym
Default Macro when Print

You need to call the Macro either from:

GlobalMacroStorage_DocumentBeforePrint

or

GlobalMacroStorage_DocumentAfterPrint

Depending on when you would like it to run.

-Shelby
Reply With Quote
Reply


Currently Active Users Viewing This Thread: 1 (0 members and 1 guests)
 
Thread Tools Search this Thread
Search this Thread:

Advanced Search
Display Modes

Posting Rules
You may not post new threads
You may not post replies
You may not post attachments
You may not edit your posts

BB code is On
Smilies are On
[IMG] code is On
HTML code is Off

Forum Jump

Similar Threads
Thread Thread Starter Forum Replies Last Post
Setting document outline unit from macro L_G_D CorelDRAW/Corel DESIGNER VBA 2 11-02-2010 11:47
How run a Macro when open a document? cmjmmrp CorelDRAW/Corel DESIGNER VBA 5 16-05-2007 06:55


All times are GMT -5. The time now is 17:17.


Powered by vBulletin® Version 3.8.1
Copyright ©2000 - 2021, Jelsoft Enterprises Ltd.
Copyright © 2011, Oberonplace.com