SetRange Method
Sets the starting and ending character positions for the range or selection.
Note Character position values start at the beginning of the story, with the first value being 0 (zero). All characters are counted, including nonprinting characters. Hidden characters are counted even if they're not displayed.
expression.SetRange(Start, End)
expression Required. An expression that returns a Range or Selection object.
Start Required Long. The starting character position of the range or selection.
End Required Long. The ending character position of the range or selection.
Remarks
The SetRange method redefines the starting and ending positions of an existing Selection or Range object. This method differs from the Range method, which is used to create a range, given a starting and ending position.
Example
This example selects the first 10 characters in the document.
Selection.SetRange Start:=0, End:=10
This example uses SetRange to redefine myRange
to refer to the first three paragraphs in the active document.
Set myRange = ActiveDocument.Paragraphs(1).Range
myRange.SetRange Start:=myRange.Start, _
End:=ActiveDocument.Paragraphs(3).Range.End
This example uses SetRange to redefine myRange
to refer to the area starting at the beginning of the document and ending at the end of the current selection.
Set myRange = ActiveDocument.Range(Start:=0, End:=0)
myRange.InsertAfter "Hello "
myRange.SetRange Start:=myRange.Start, End:=Selection.End
This example extends the selection to the end of the document.
Selection.SetRange Start:=Selection.Start, _
End:=ActiveDocument.Content.End