OberonPlace.com Forums  

Go Back   OberonPlace.com Forums > Oberon Products > New product ideas

Reply
 
Thread Tools Search this Thread Display Modes
  #1  
Old 06-12-2010, 05:23
NightLord
Guest
 
Posts: n/a
Default Auto page size

Hi all, I'm searching for a macro that resize the page depending the size of the object ok sorry, bad english.
For example, if I have a logo that misure 5x5 inch, the macro should center in the page, and resize the page to 6x6 inch (a little big) or if I have a logo that misure 10x30 inch, the macro should center in the page and than resize the page 11x31 inch...and so on... I hope to be clear
If there is something can you give me the link, please?
Thank you, bye.
NL
Reply With Quote
  #2  
Old 06-12-2010, 13:48
shelbym's Avatar
shelbym shelbym is offline
Senior Member
 
Join Date: Nov 2002
Location: Cheyenne, WY
Posts: 1,769
Blog Entries: 9
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 Size Page to Shapes

You could do something like this:
Code:
Sub SizePageToShapes()
    Const dblGap As Double = 1
    Dim p As Page
    Dim x As Double, y As Double
    
    Set p = ActivePage
    
    p.Shapes.All.GetSize x, y
    p.SetSize x + dblGap, y + dblGap
    p.Shapes.All.AlignRangeToPageCenter cdrAlignHCenter + cdrAlignVCenter
End Sub
Best of luck,

-Shelby
Reply With Quote
  #3  
Old 07-12-2010, 02:29
NightLord
Guest
 
Posts: n/a
Default

wow thank you, it works great!
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
place text inside box with auto size? bprice CorelDRAW/Corel DESIGNER VBA 8 08-02-2008 09:52
Page Size String ddonnahoe CorelDRAW/Corel DESIGNER VBA 3 15-12-2006 15:21
Page Size List.... !??!?! Booker General 2 19-06-2006 13:09
Property Bar shows incorrect page size Alex FAQ 1 29-11-2005 09:34
Printer page size and orientation from VBA narcix CorelDRAW/Corel DESIGNER VBA 9 17-10-2003 15:54


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


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