Range.Relocate (Word)

En la vista Esquema mueve los párrafos dentro del intervalo especificado a continuación del siguiente párrafo visible o delante del anterior.

El título se mueve junto con el texto principal sólo si se contrae el texto en la vista Esquema o si forma parte del intervalo.

Relocate (Direction)

Direction: Dirección del movimiento.

theStart = ActiveDocument.Paragraphs(3).Range.Start 
theEnd = ActiveDocument.Paragraphs(5).Range.End 
Set myRange = ActiveDocument.Range(Start:=theStart, End:=theEnd) 
ActiveDocument.ActiveWindow.View.Type = wdOutlineView 
myRange.Relocate Direction:=wdRelocateDown