Document.DeleteAllEditableRanges (Word)

Deletes permissions in all ranges for which the specified user or group of users has permission to modify.

You can also use the DeleteAll method to delete permissions in all ranges for which a specified user or group of users has permission to modify.

DeleteAllEditableRanges (EditorID)

EditorID: Can be either a String that represents the user's email alias (if in the same domain), an email address, or a WdEditorType constant that represents a group of users. If omitted, no permissions are deleted from a document.

ActiveDocument.DeleteAllEditableRanges wdEditorCurrent