API Documentation > CorelDRAW > 2025-v26 > TextRange > IVGTextRange
TextRange.End property
Ending character position of the range in the text stream
Syntax:
Property Get End() As Long
Property Let End(ByVal Value As Long)
Remarks:
The End property returns the position of the ending character in a text range.
Examples:
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