Cell.CellTextOrientation-Eigenschaft (Publisher)

Gibt eine PbTextOrientation-Konstante zurück, die den Textfluss in einer angegebenen Tabellenzelle darstellt, oder legt sie fest. Lese-/Schreibzugriff.

Syntax

Ausdruck. CellTextOrientation

Ausdruck Eine Variable, die ein Cell-Objekt darstellt.

Rückgabewert

PbTextOrientation

HinwBemerkungeneise

Der CellTextOrientation-Eigenschaftswert kann eine der in der Microsoft Publisher-Typbibliothek deklarierten PbTextOrientation-Konstanten sein.

Beispiel

Bei diesem Beispiel wird die Höhe der Zellen in der ersten Zeile vergrößert und anschließend vertikal orientierter Überschriftentext hinzugefügt.

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 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.