Object Model Reference : Classes : P : Page : Properties : Page.Orientation |
Property Orientation As cdrPageOrientation
Member of Page
The Orientation property returns or specifies the orientation of a page. When setting a different orientation for the page, the values for the width and height are exchanged.
The Orientation property returns a value of cdrPageOrientation.
The following VBA example inserts a text object on each page, indicating the page orientation of the page.
Sub Test() |
Dim Orient As String |
Dim p As Page |
For Each p In ActiveDocument.Pages |
If p.Orientation = cdrPortrait Then |
Orient = "Portrait" |
Else |
Orient = "Landscape" |
End If |
p.ActiveLayer.CreateArtisticText 0, 0, Orient |
Next p |
End Sub |
Copyright 2013 Corel Corporation. All rights reserved.