TextRange Top プロパティ (PowerPoint)TextRange.BoundTop property (PowerPoint)

指定したテキストフレームの境界ボックスの上端からスライドの上端までの間隔 (ポイント) を取得します。Returns the distance (in points) from the top of the of the text bounding box for the specified text frame to the top of the slide. 読み取り専用です。Read-only.

構文Syntax

expression.expression. BoundTop

TextRangeオブジェクトを表す変数を取得します。expression A variable that represents a TextRange object.

戻り値Return value

1 行Single

Example

次の使用例は、作業中のプレゼンテーションのスライド 1 に角丸四角形を追加します。This example adds a rounded rectangle to slide one in the active presentation. この四角形は図形 1 の境界ボックスと同じ寸法です。The rectangle has the same dimensions as the text bounding box for shape one.

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

関連項目See also

TextRange オブジェクトTextRange Object

サポートとフィードバックSupport and feedback

Office VBA またはこの説明書に関するご質問やフィードバックがありますか?Have questions or feedback about Office VBA or this documentation? サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.