Table.TableDirection-Eigenschaft (Publisher)

Gibt eine PbTableDirectionType-Konstante zurück, die angibt, ob Text in einer Tabelle von links nach rechts oder von rechts nach links gelesen wird, oder legt sie fest. Lese-/Schreibzugriff.

Syntax

Ausdruck. TableDirection

Ausdruck Eine Variable, die ein Table-Objekt darstellt.

Rückgabewert

PbTableDirectionType

Hinweise

Der Wert der TableDirection-Eigenschaft kann eine der in der Microsoft Publisher-Typbibliothek deklarierten PbTableDirectionType-Konstanten sein: pbTableDirectionLeftToRight oder pbTableDirectionRightToLeft.

Beispiel

Dieses Beispiel gibt in jede Zelle in der angegebenen Tabelle eine fett gedruckte Zahl ein und legt dann die Richtung der Tabelle so fest, dass die Zellen von rechts nach links nummeriert werden. Damit dieses Beispiel funktionsfähig ist, muss es sich bei der angegebenen Form um eine Tabelle handeln.

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

Support und Feedback

Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.