Propiedad Cell.CellTextOrientation (Publisher)

Devuelve o establece una constante PbTextOrientation que representa el flujo de texto de una celda de tabla especificada. Lectura y escritura.

Sintaxis

expresión. CellTextOrientation

Expresión Variable que representa un objeto Cell .

Valor devuelto

PbTextOrientation

Comentarios

El valor de la propiedad CellTextOrientation puede ser una de las constantes PbTextOrientation declaradas en la biblioteca de tipos de Microsoft Publisher.

Ejemplo:

En este ejemplo se aumenta el alto de las celdas de la primera fila y, a continuación, se agrega un texto de encabezado orientado de arriba a abajo.

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

Soporte técnico y comentarios

¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.