Range.SetRange (Word)

Define as posições de caractere inicial e final de um intervalo existente.

Os valores de posição de caractere começam no início do texto, sendo 0 (zero) o primeiro valor. Todos os caracteres são contados, incluindo os não imprimíveis. Os caracteres ocultos são contados mesmo quando não são exibidos. O método SetRange redefine as posições inicial e finais de um objeto de intervalo existente. Esse método difere o método Range, que é usado para criar um intervalo, a recebe um inicial e final posição.

SetRange (Start, End)

Set myRange = ActiveDocument.Paragraphs(1).Range 
myRange.SetRange Start:=myRange.Start, _ 
 End:=ActiveDocument.Paragraphs(3).Range.End

Arguments

O seguinte argumento é opcional

Start (Long) - A posição de caractere inicial do intervalo.

End (Long) - A posição de caractere final do intervalo.