Range.Duplicate (Word)

Returns a read-only Range object that represents all the properties of the specified range.

By duplicating a Range object, you can change the starting or ending character position of the duplicate range without changing the original range.

Dim rngDuplicate As Range
Set rngDuplicate = ActiveDocument.Range.Duplicate