TextRange.BoundLeft property (Publisher)

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.



expression A variable that represents a TextRange object.

Return value



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.

Dim rngText As TextRange 
Dim strMessage As String 
Set rngText = ActiveDocument.Pages(1) _ 
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

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.