Compartilhar via


Propriedade Cell.CellTextOrientation (Publisher)

Retorna ou define uma constante PbTextOrientation que representa o fluxo de texto em uma célula de tabela especificada. Leitura/gravação.

Sintaxe

expressão. CellTextOrientation

Expressão Uma variável que representa um objeto Cell .

Valor de retorno

PbTextOrientation

Comentários

O valor da propriedade CellTextOrientation pode ser uma das constantes PbTextOrientation declaradas na biblioteca de tipos do Microsoft Publisher.

Exemplo

Este exemplo aumenta a altura das células na primeira linha e, em seguida, adiciona texto no título orientado verticalmente.

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

Suporte e comentários

Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.