Range.Parent (Word)

Returns an object that represents the parent object of the specified Range object.

Dim objParent As Object
Set objParent = ActiveDocument.Range.Parent