Share via


Orientation Property [Publisher 2003 VBA Language Reference]

Orientation property as it applies to the TextFrame object.

PbTextOrientation

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.

Orientation property as it applies to the PageSetup object.

PbOrientationType

PbOrientationType can be one of these PbOrientationType constants.
pbOrientationLandscape
pbOrientationPortrait

expression.Orientation

expression Required. An expression that returns one of the objects in the Applies To list.

Example

As it applies to the TextFrame object.

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

As it applies to the PageSetup object.

The following example sets the orientation of the pages in the active document to landscape.

With ActiveDocument.PageSetup
    .Orientation = pbOrientationLandscape
End With

Applies to | PageSetup Object | TextFrame Object