Remarque
L’accès à cette page nécessite une autorisation. Vous pouvez essayer de vous connecter ou de modifier des répertoires.
L’accès à cette page nécessite une autorisation. Vous pouvez essayer de modifier des répertoires.
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.