Document.RemovePersonalInformation (Word)

True if Microsoft Word removes all user information from comments, revisions, and the Properties dialog box upon saving a document.

Sub RemovePersonalInfo() 
 ActiveDocument.RemovePersonalInformation = True 
End Sub