Hi all,
This is probably a stupid question, but hopefully someone can help.
Is there a way to create a page from a selected object? For example, if I select a rectangle that forms the background of my image, can I create a page of the same size and in the same location? I used to use Inkscape, and it was very simple to do that.
I had to change my paper size and now my drawing does not align with the page. The drawing is very complex and I would rather not have to move it. If there is an easy way to realign the page, please let me know.
I hope that makes sense...I'm rather new to CorelDRAW.
i Had the same issue with corel....the crop tool, well doesnt do anything....It should resize the canvas to the selection you make....but its.....well doesn't work that way. (Or atleast that is what i thought)
It only work by resizing what you made (or cutting it). It doesnt change the canvas size)
To do so use the crop tool...3rd tool down and when you make the selection (like using the marquee tool) double click the selection. But the good thing is when you export the file (ctrl + e) you will not see the extra white areas. So that should do it.
If any more question let us know.
AlphaNiner said:It only work by resizing what you made (or cutting it). It doesnt change the canvas size)
Canvas...Sounds like you're coming from from Photoshop. Give it some time. I've seen many who make the switch. It takes a little while to get used to a vector app, but you should catch on soon.
Jennifer said: Is there a way to create a page from a selected object? For example, if I select a rectangle that forms the background of my image, can I create a page of the same size and in the same location? I used to use Inkscape, and it was very simple to do that. I had to change my paper size and now my drawing does not align with the page. The drawing is very complex and I would rather not have to move it. If there is an easy way to realign the page, please let me know.
Mabe this little macro will work for you. It will adjust page to selected items.
Option ExplicitSub fitCanvas() Dim s As Shape Dim w As Double, h As Double Set s = ActiveSelection If s.Shapes.Count = 0 Then MsgBox "Please make a selection" Exit Sub End If s.GetSize w, h ActivePage.SizeHeight = h ActivePage.SizeWidth = w ActiveDocument.ReferencePoint = cdrBottomLeft s.SetPosition 0, 0End Sub
-John
John,
Thank you SO much - that is exactly what I needed! You even summed it up in much more simple terms than my exhausted brain was capable of: "adjust page to selected items". It is really bizarre to me that the capability isn't built right into the program. The page layout options are very limited. I rarely know the final paper size when I start a project.
This is going to make my life so much easier.
Jennifer
Hi.
You're very welcome. Glad to help.
This adds a margin option, and you may find the bottom sub handy to toggle the page border.
The toggle page border part was not written by me.
Option ExplicitSub fitCanvas() Dim s As Shape Dim w As Double, h As Double Dim marg As Double ActiveDocument.Unit = cdrInch marg = 0.25 '<<<<<<<< set margin here <<<<<<<<<<< Set s = ActiveSelection If s.Shapes.Count = 0 Then MsgBox "Please make a selection" Exit Sub End If s.GetSize w, h ActivePage.SizeHeight = h + (marg * 2) ActivePage.SizeWidth = w + (marg * 2) ActiveDocument.ReferencePoint = cdrBottomLeft s.SetPosition 0 + marg, 0 + margEnd SubSub ToggleBorders() '--written by Os. Posted on http://forum.oberonplace.com/showthread.php?t=1691&highlight=PageBorder If ActiveDocument.Properties("PageBorder", 1) Then ActiveDocument.Properties("PageBorder", 1) = False Else ActiveDocument.Properties("PageBorder", 1) = True End If Application.FrameWork.Automation.Invoke "77f7f9eb-3e06-4899-9a8b-80d9e2aa68d3" End Sub
Thank You John.
it's very helpfull :)