Orientation Property
This content is no longer actively maintained. It is provided as is, for anyone who may still be using these technologies, with no warranties or claims of accuracy with regard to the most recent product version or service release.
Orientation property as it applies to the PageSetup object.
WdOrientation
| WdOrientation can be one of these WdOrientation constants. |
| wdOrientLandscape |
| wdOrientPortrait |
expression.Orientation
expression Required. An expression that returns a PageSetup object.
Orientation property as it applies to the Range and Selection objects.
WdTextOrientation
| WdTextOrientation can be one of these WdTextOrientation constants. |
| wdTextOrientationDownward |
| wdTextOrientationHorizontal |
| wdTextOrientationHorizontalRotatedFarEast |
| wdTextOrientationUpward |
| wdTextOrientationVerticalFarEast |
expression.Orientation
expression Required. An expression that returns one of the above objects.
Orientation property as it applies to the TextFrame object.
MsoTextOrientation
| MsoTextOrientation can be one of these MsoTextOrientation constants. |
| msoTextOrientationDownward |
| msoTextOrientationHorizontal |
| msoTextOrientationHorizontalRotatedFarEast |
| msoTextOrientationMixed |
| msoTextOrientationUpward |
| msoTextOrientationVertical |
| msoTextOrientationVerticalFarEast |
expression.Orientation
expression Required. An expression that returns a TextFrame object.
Remarks
Some of the constants listed above may not be available to you, depending on the language support (U.S. English, for example) that you’ve selected or installed.
You can set the orientation for a text frame or for a range or selection that happens to occur inside a text frame. For information about the difference between a text frame and a text box, see the TextFrame object.
Example
As it applies to the TextFrame object
This example creates a new document, inserts text into it, uses this text to create a text box, and then sets the orientation of the text frame so that the text slopes upward.
Set mydoc = Documents.Add
Selection.TypeText "This is some text."
mydoc.Content.Select
Selection.CreateTextbox
mydoc.Shapes(1).TextFrame.Orientation = msoTextOrientationUpward
As it applies to the PageSetup object.
This example changes the orientation of the document named "MyDocument.doc" and then prints the document. The example then changes the orientation of the document back to portrait.
Set myDoc = Documents("MyDocument.doc")
With myDoc
.PageSetup.Orientation = wdOrientLandscape
.PrintOut
.PageSetup.Orientation = wdOrientPortrait
End With