CorelDRAW Community
Site
Search
User
Site
Search
User
Developer Area
CorelDRAW and Corel DESIGNER API
VBA Shape.AlignToPage Broken?
Forums
Wikis
API References
Tags
More
Cancel
New
Developer Area requires membership for participation - click to join
Threads in this forum
By title
By date
By reply count
By view count
By most asked
By votes
By quality
Descending
Ascending
All recent questions and discussions
Unread questions and discussions
Questions and discussions you've participated in
Questions and discussions you've started
Unanswered questions and discussions
Answered questions and discussions
Questions with suggested answers
The issue after replacing the UI renderer to EDGE
Not Answered
1 day ago
what on earth coreldraw docker is?
10 months ago
PowerShell
5 days ago
CorelDRAW 2020 VBA Use SetIcon2 , After rootboot Losed ICON
Not Answered
7 days ago
Statusbar Button
Not Answered
8 days ago
I would like to share a permanently free and open CorelDRAW plugin.
8 days ago
How Can I open "Save as", "Export" dialog by VBA code?
Not Answered
25 days ago
Powerclip, spritesheet and Threads, c# code at the end
1 month ago
Whats new in the Object Model for CorelDRAW 2023
over 1 year ago
CorelDRW.exe vs DrawPE.exe
Not Answered
2 months ago
Having trouble with Document.SaveAsCopy
Not Answered
over 5 years ago
Add todays date and version to your project and replace date and increment version by 1 when revising
2 months ago
Node Size Toggle
Not Answered
3 months ago
My tool has a good result
4 months ago
COPY CUSTOM CONTROL WITH ALL CODE CONTEINING
4 months ago
ActiveLayer.Paste.addToSelection gives run-time error 91
4 months ago
ALIGN RIGHT USERFORM CAPTION
9 months ago
Corel don't set APPUI.xslt data value to my "own dependency property" in wpf
4 months ago
Documentation and tutorials
over 1 year ago
User Form
5 months ago
Related
VBA Shape.AlignToPage Broken?
Sean Donnahoe
over 7 years ago
Can anyone confirm that Shape.AlignToPage or .AlignToPageCenter are broken in X7?
Parents
NudeFan
over 7 years ago
Due to the fact, that X7 had also other problems I not really used this version, I stayed with X6 until X8 came out. It also has some bugs, but I can work with it.
You tried it with X8 as well?
Cancel
Up
0
Down
Reply
Cancel
Reply
Myron
over 7 years ago
in reply to
NudeFan
Yes, I couldn't get AlignToPageCenter to work either but fwiw. This one aligns a shape to page center and allows the selection of multiple shapes and aligns them to page center
Sub AlignToPage()
Dim sr As ShapeRange
Dim pw#, ph#
ActiveDocument.ActivePage.GetSize pw, ph
ActiveDocument.ReferencePoint = cdrCenter
Set sr = ActiveSelectionRange
If sr.Count = 0 Then Exit Sub
sr.SetPosition pw / 2, ph / 2
End Sub
Cancel
Up
0
Down
Reply
Cancel
Children
Myron
over 7 years ago
in reply to
Myron
ActiveSelectionRange.AlignAndDistribute cdrAlignDistributeHAlignCenter, cdrAlignDistributeVAlignCenter, cdrAlignShapesToCenterOfPage
Cancel
Up
0
Down
Reply
Cancel