PageSizes.Add

Function Add(Name As String, Width As Double, Height As Double) As PageSize

The Add method adds a custom page size to the collection.


Parameters	Description
Name	Specifies the name of the custom page size
Width	Specifies the width
Height	Specifies the height

The following code example adds a new page size named Test Paper Size, which has a width of 5.5 inches and a height of 9.5 inches:

Public Sub PageSizes_Add() 
 Dim ps As PageSizes 
 Dim d As Document 
 Set d = CreateDocument 
 Set ps = d.PageSizes 
 ps.Add "Test Paper Size", 5.5, 9.5 
End Sub