Range.SetRange (Word)
Establece las posiciones de carácter inicial y final de un intervalo existente.
Los valores de posición de carácter empiezan al principio del artículo, siendo el primer valor 0 (cero). El método SetRange vuelve a definir las posiciones inicial y final de un objeto Range existente.
Set myRange = ActiveDocument.Paragraphs(1).Range
myRange.SetRange Start:=myRange.Start, _
End:=ActiveDocument.Paragraphs(3).Range.End
Arguments
Estos son los argumentos con nombre :
Start (Long) - Posición del carácter inicial del intervalo.
End (Long) - Posición del carácter final del intervalo.