Range.InsertParagraphAfter (Word)

Inserts a paragraph mark after a range.

After this method is applied, the range expands to include the new paragraph.

Set myRange = ActiveDocument.Range(0, 0) 
With myRange 
 .InsertBefore "Title" 
 .ParagraphFormat.Alignment = wdAlignParagraphCenter 
 .InsertParagraphAfter 
End With