Publisher) (Table.TableDirection 屬性

會傳回或設定 PbTableDirectionType 常 數，代表資料表中的文字是從左至右讀取，還是從右至左讀取。 讀取/寫入。

語法

運算式。TableDirection

表達 代表 Table 物件的變數。

傳回值

PbTableDirectionType

註解

TableDirection屬性值可以是 Microsoft Publisher 類型程式庫中所宣告的PbTableDirectionType常數之一：pbTableDirectionLeftToRight或pbTableDirectionRightToLeft。

範例

本範例將粗體數字輸入指定表格的每個儲存格，然後設定表格的方向，讓儲存格數字從左至右。 為了讓本範例順利運作，指定的圖案必須是表格。

Sub CountCellsByColumn() 
 Dim tblTable As Table 
 Dim rowTable As row 
 Dim celTable As Cell 
 Dim intCount As Integer 
 
 Set tblTable = ActiveDocument.Pages(1).Shapes(1).Table 
 
 'Loops through each row in the table 
 For Each rowTable In tblTable.Rows 
 
 'Loops through each cell in the row 
 For Each celTable In rowTable.Cells 
 With celTable.TextRange 
 intCount = intCount + 1 
 .Text = intCount 
 .ParagraphFormat.Alignment = _ 
 pbParagraphAlignmentCenter 
 .Font.Bold = msoTrue 
 End With 
 Next celTable 
 Next rowTable 
 tblTable.TableDirection = pbTableDirectionRightToLeft 
End Sub

支援和意見反應

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