Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

  • Congratulations IamaSherpa on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

Programatically setting the page size

Status
Not open for further replies.

mark1162

Programmer
Jun 29, 2001
1
US
Have just started sing Visio. I am programatically dropping masters onto a page. I now need to make the page fit the masters. How can I accomplish this.
 
The following code will set the page size
ActivePage.Shapes("thePage").Cells("PageWidth").Formula = 7.5
ActivePage.Shapes("thePage").Cells("PageHeight").Formula = 15

This code will show you what it is set to
Debug.Print ActivePage.Shapes("thePage").Cells("PageWidth")
Debug.Print ActivePage.Shapes("thePage").Cells("PageHeight")

John... Visio MVP
 
Status
Not open for further replies.

Part and Inventory Search

Sponsor

Back
Top