Object Model Reference : Classes : T : TextRange : Properties : 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 |
Copyright 2013 Corel Corporation. All rights reserved.