Page.GetSize

Sub GetSize(Width As Double, Height As Double)

Member of Page

The GetSize method gets both the width and height of a page.


Parameters	Description
Width	Returns the width of a page, measured in document units
Height	Returns the height of a page, measured in document units

The following code example creates a rectangle with the size of active page (that is, the page frame):

Sub Test() 
 Dim sx As Double, sy As Double 
 ActivePage.GetSize sx, sy 
 ActiveLayer.CreateRectangle2 0, 0, sx, sy 
End Sub