Since Word for Mac 2011 supports macros you should be able to automate this by placing all your documents in one folder and running the code below.
Change vDirectory to the path of the folder which contains the documents to modify. The sAuthorName variable should contain the replacment name. The required function GetFilesOnMacWithOrWithoutSubfolders can be found online here.
Disclamer: This macro has not been tested on a MAC
Sub ChangeAuthorInDocumentComments ()
Dim vDirectory As String
Dim sAuthorName As String
Dim oDoc As Document
vDirectory = "C:\Docs\"
sAuthorName = "Adam"
MyFiles = ""
Call GetFilesOnMacWithOrWithoutSubfolders(Level:=1, ExtChoice:=7, FileFilterOption:=3, FileNameFilterStr:=".doc")
Application.ScreenUpdating = False
If MyFiles <> "" Then
MySplit = Split(MyFiles, Chr(10))
For FileInMyFiles = LBound(MySplit) To UBound(MySplit) - 1
Set oDoc = Documents.Open(MySplit(FileInMyFiles))
For Each Ocom In ActiveDocument.Comments
With Ocom
Ocom.Author = sAuthorName
End With
Next
oDoc.Close SaveChanges:=True
Next FileInMyFiles
End If
Application.ScreenUpdating = True
End Sub
2
Possible duplicate of this question. Good luck.
– long – 2013-12-02T00:05:25.237