Table.GrowToFitText プロパティ (Publisher)

True テーブル内のセルのテキストに合わせて垂直方向に拡大します。 値の取得と設定が可能です。

構文

GrowToFitText

Table オブジェクトを表す変数。

戻り値

Boolean

次の使用例は、指定した表の各行の高さを 12 ポイントに設定し、その行のセルにテキストが追加されても行の高さを拡大しません。

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

サポートとフィードバック

Office VBA またはこの説明書に関するご質問やフィードバックがありますか? サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。