| Name | Type | Description |
|---|---|---|
| Name |
String
|
|
| Width |
Double
|
|
| Height |
Double
|
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