Selection.Editors property (Word)
Returns an Editors object that represents all the users authorized to modify a selection within a document.
expression A variable that represents a 'Selection' object.
The following example gives the current user editing permission to modify the active selection.
Dim objEditor As Editor Set objEditor = Selection.Editors.Add(wdEditorCurrent)