TextRange.BoundWidth プロパティ (PowerPoint)

指定したテキストフレームの境界ボックスの幅 (ポイント) を取得します。 値の取得のみ可能です。

構文

BoundWidth

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

戻り値

1 行

次の使用例は、作業中のプレゼンテーションのスライド 1 に角丸四角形を追加します。 この四角形は図形 1 の境界ボックスと同じ寸法です。

With Application.ActivePresentation.Slides(1).Shapes
    Set tr = .Item(1).TextFrame.TextRange
    Set roundRect = .AddShape(msoShapeRoundedRectangle, _
        tr.BoundLeft, tr.BoundTop, tr.BoundWidth, tr.BoundHeight)
End With

With roundRect.Fill
    .ForeColor.RGB = RGB(255, 0, 128)
    .Transparency = 0.75
End With

関連項目

TextRange オブジェクト

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

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