Selection.SelectCurrentAlignment (Word)

Extends the selection forward until text with a different paragraph alignment is encountered.

There are four types of paragraph alignment: left, centered, right, and justified.

Selection.SelectCurrentAlignment 
Selection.Collapse Direction:=wdCollapseEnd 
If Selection.End = ActiveDocument.Content.End - 1 Then 
 MsgBox "No change in alignment found." 
End If