Range.Document (Word)

Renvoie un objet document associé à la plage spécifiée.

Dim docDocument As Document
Set docDocument = ActiveDocument.Range.Document