Partager via


Propriété Cell.CellTextOrientation (Publisher)

Renvoie ou définit une constante PbTextOrientation qui représente le flux de texte dans une cellule de tableau spécifiée. Lecture-écriture.

Syntaxe

expression. CellTextOrientation

Expression Variable qui représente un objet Cell .

Valeur renvoyée

PbTextOrientation

Remarques

La valeur de la propriété CellTextOrientation peut être l’une des constantes PbTextOrientation déclarées dans la bibliothèque de type Microsoft Publisher.

Exemple

Cet exemple augmente la hauteur des cellules de la première ligne, puis ajoute un titre disposé verticalement.

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

Assistance et commentaires

Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.