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.