PageSize.Width

Property Width As Double

Member of PageSize

The Width property returns the width of a page.

The following VBA example displays the names of all page sizes, and their widths and heights, if the paper type is predefined.

Sub Test()

Dim ps As PageSizes

Dim d As Document

Dim p As PageSize

Dim st As String

Dim s As Shape

Set d = CreateDocument

Set ps = d.PageSizes

For Each p In ps

If p.BuiltIn Then

st = st & p.Name & "(" & p.Width & " X " & p.Height & ")" & vbCr

End If

Next p

Set s = d.ActiveLayer.CreateParagraphText(8.5, 11, 0, 0, st)

End Sub