TextRange.BoundLeft property (PowerPoint)
Returns the distance (in points) from the left edge of the text bounding box for the specified text frame to the left edge of the slide. Read-only.
Syntax
expression. BoundLeft
expression A variable that represents a TextRange object.
Return value
Single
Example
This example adds a rounded rectangle to slide one in the active presentation. 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
Support and feedback
Have questions or feedback about Office VBA or this documentation? Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.