Returns or sets a PbTextOrientation constant that represents how text flows in a text box. Read/write.
| PbTextOrientation can be one of these PbTextOrientation constants. |
| pbTextOrientationHorizontal |
| pbTextOrientationMixed |
| pbTextOrientationRightToLeft |
| pbTextOrientationVerticalEastAsia |
expression.Orientation
expression Required. An expression that returns one of the objects in the Applies To list.
This example sets the text orientation in the specified text box to vertical so that text flows from top to bottom. This assumes there is at least one shape on page one of the active publication.
Sub SetVerticalTextBox()
ActiveDocument.Pages(1).Shapes(1).TextFrame _
.Orientation = pbTextOrientationVerticalEastAsia
End Sub