TextRange.BoundLeft Property

  • Article
Publisher Developer Reference

Returns a Single indicating the distance, in points, from the left edge of the leftmost page to the left edge of the bounding box for the specified text range. Read-only.

Syntax

expression.BoundLeft

expression   A variable that represents a TextRange object.

Return Value
Single

Example

The following example displays the position, width, and height of the bounding box surrounding the text in the first shape on page one of the active publication.

Visual Basic for Applications 
  Dim rngText As TextRange
Dim strMessage As String

Set rngText = ActiveDocument.Pages(1) _
.Shapes(1).TextFrame.TextRange


With rngText
strMessage = "Text frame information" & vbCrLf _
& "    Distance from left edge of page: " _
& .BoundLeft & " points" & vbCrLf _
& "    Distance from top edge of page: " _
& .BoundTop & " points" & vbCrLf _
& "    Width: " & .BoundWidth & " points" & vbCrLf _
& "    Height: " & .BoundHeight & " points"
End With


MsgBox strMessage

See Also