Publisher) (Cell.CellTextOrientation 屬性

會傳回或設定 PbTextOrientation 常數，代表指定表格儲存格中的文字流程。 讀取/寫入。

語法

運算式。CellTextOrientation

表達 代表 Cell 物件的變數。

傳回值

PbTextOrientation

註解

CellTextOrientation屬性值可以是 Microsoft Publisher 類型程式庫中所宣告的PbTextOrientation常數之一。

範例

本範例會增加第一列的儲存格高度，然後加入直排的標題文字。

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

支援和意見反應

有關於 Office VBA 或這份文件的問題或意見反應嗎？ 如需取得支援服務並提供意見反應的相關指導，請參閱 Office VBA 支援與意見反應。