Selection.ParagraphFormat.Alignment = wdAlignParagraphCenter
    With ActiveDocument.PageSetup
        .VerticalAlignment = wdAlignVerticalCenter
    End With