Selection.IsEqual (Word)

True, wenn die Auswahl, auf die diese Methode angewandt wird, gleich dem Bereich ist, der durch das Argument Range angegeben wurde.

Diese Methode vergleicht sowohl die Anfangs- und Endzeichenposition als auch die Artikelart.

IsEqual (Range)

Range: Das Bereich, der mit der aktuellen Auswahl verglichen werden soll.

If Selection.IsEqual(ActiveDocument _ 
 .Paragraphs(2).Range) = False Then 
 ActiveDocument.Paragraphs(2).Range.Select 
End If