TextRange.End

Property End As Long

Member of TextRange

The End property returns the position of the ending character in a text range.

The following VBA example displays the ending position of the first word in the paragraph.

Sub Test()

Dim s As Shape

Dim d As Document

Dim t As Text

Set d = CreateDocument

Set s = d.ActiveLayer.CreateParagraphText(3, 3, 5, 5, "This is an example.")

Set t = s.Text

MsgBox "The end position of the first word is " & t.Story.Words.First.End

End Sub