PageSize.Name

Property Name As String

The Name property returns the name of the paper type.

The Name property returns a read-only value.

The following code 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