指定したテキストのテキスト境界ボックスの高さを ポイント単位で取得します。 読み取り専用です。
構文
式。BoundHeight
式TextRange2 オブジェクトを返す式。
戻り値
1 行
注釈
テキスト境界ボックスが TextFrame オブジェクトと同じではありません。 TextFrame オブジェクトの場合は、テキストが存在するコンテナーを表します。 テキスト境界ボックスは、テキストの周囲に境界を表します。
例
次の使用例は、PowerPoint プレゼンテーションのテキスト境界ボックスと同じサイズの角丸長方形をスライド 1 に追加します。
With ActivePresentation.Slides(1).Shapes(1)
Set txb = .TextFrame.Text
Set roundRect = .AddShape(ppShapeRoundRect, _
txb.BoundLeft, txb.BoundTop, txb.BoundWidth, txb.BoundHeight)
roundRect.Fill.Transparency = 0.25
End With
関連項目
サポートとフィードバック
Office VBA またはこの説明書に関するご質問やフィードバックがありますか？ サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。