Edit

Share via

Cell.CellTextOrientation property (Publisher)

  • Article

Returns or sets a PbTextOrientation constant that represents the flow of text in a specified table cell. Read/write.

Syntax

expression.CellTextOrientation

expression A variable that represents a Cell object.

Return value

PbTextOrientation

Remarks

The CellTextOrientation property value can be one of the PbTextOrientation constants declared in the Microsoft Publisher type library.

Example

This example increases the height of the cells in the first row, and then adds vertically-oriented heading text.

Sub VerticalText() 
 Dim rowTable As Row 
 Dim celTable As Cell 
 
 With ActiveDocument.Pages(2).Shapes(1).Table.Rows(1) 
 .Height = Application.InchesToPoints(1.5) 
 For Each celTable In .Cells 
 With celTable 
 .CellTextOrientation _ 
 = pbTextOrientationVerticalEastAsia 
 .TextRange.ParagraphFormat.Alignment _ 
 = pbParagraphAlignmentCenter 
 .TextRange.Text = "Column Heading " _ 
 & celTable.Column 
 End With 
 Next 
 End With 
End Sub

Support and feedback

Have questions or feedback about Office VBA or this documentation? Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.