Range.Relocate (Word)

In outline view, moves the paragraphs within the specified range after the next visible paragraph or before the previous visible paragraph.

Body text moves with a heading only if the body text is collapsed in outline view or if it is part of the range.

Relocate (Direction)

Direction: The direction of the move.

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