OberonPlace.com Forums  

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

Thread Tools Search this Thread Display Modes
Old 06-12-2010, 04:23
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.
Reply With Quote
Old 06-12-2010, 12:48
shelbym's Avatar
shelbym shelbym is offline
Senior Member
Join Date: Nov 2002
Location: Cheyenne, WY
Posts: 1,782
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 Size Page to Shapes

You could do something like this:
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,

Reply With Quote
Old 07-12-2010, 01:29
Posts: n/a

wow thank you, it works great!
Reply With Quote

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 08:52
Page Size String ddonnahoe CorelDRAW/Corel DESIGNER VBA 3 15-12-2006 14:21
Page Size List.... !??!?! Booker General 2 19-06-2006 12:09
Property Bar shows incorrect page size Alex FAQ 1 29-11-2005 08:34
Printer page size and orientation from VBA narcix CorelDRAW/Corel DESIGNER VBA 9 17-10-2003 14:54

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

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