PowerPoint) (TextRange.BoundTop 屬性

會傳回所指定文字圖文框之文字週框方塊頂端與投影片頂端之間的距離 (以點為單位)。 唯讀。

語法

expression。 BoundTop

表達 代表 TextRange 物件的 變數。

傳回值

單一

範例

本範例會將圓角矩形新增至使用中簡報的第一個投影片內。 該矩形與圖案一的文字週框方塊具有相同的尺寸。

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 支援與意見反應。