Freigeben über


Table.GrowToFitText-Eigenschaft (Publisher)

True für Zellen in einer Tabelle, vertikal zu erhöhen, um Text angepasst. Lese-/Schreibzugriff.

Syntax

Ausdruck. GrowToFitText

Ausdruck Eine Variable, die ein Table-Objekt darstellt.

Rückgabewert

Boolesch

Beispiel

Dieses Beispiel legt jede Zeile der angegebenen Tabelle auf 12 Punkt fest, und die Zeilenhöhe wird nicht vergrößert, wenn den Zellen in den Zeilen Text hinzugefügt wird.

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

Support und Feedback

Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.