Object Model Reference : Classes : P : PageSize : Methods : PageSize.Delete |
Sub Delete()
Member of PageSize
The Delete property deletes a custom paper type.
The following VBA example deletes all page sizes that are not predefined, including custom page sizes.
Sub Test() |
Dim ps As PageSizes |
Dim d As Document |
Dim p As PageSize |
Set d = CreateDocument |
Set ps = d.PageSizes |
For Each p In ps |
If Not p.BuiltIn Then |
p.Delete |
End If |
Next p |
End Sub |
Copyright 2013 Corel Corporation. All rights reserved.