Compartir a través de


Propiedad Table.GrowToFitText (Publisher)

True para que las celdas de una tabla aumenten en sentido vertical para ajustar el texto. Lectura y escritura.

Sintaxis

expresión. GrowToFitText

expresión Variable que representa un objeto Table .

Valor devuelto

Booleano

Ejemplo

En este ejemplo se establece cada fila de la tabla especificada en 12 puntos; el alto de la fila no aumenta a medida que se agrega texto a las celdas.

Sub DontEnlargeTableCells() 
 Dim rowTable As Row 
 With ActiveDocument.Pages(1).Shapes(1).Table 
 .GrowToFitText = False 
 For Each rowTable In .Rows 
 rowTable.Height = 12 
 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.