Поскольку Word для Mac 2011 поддерживает макросы, вы сможете автоматизировать это, поместив все свои документы в одну папку и выполнив приведенный ниже код.
Измените vDirectory на путь к папке, содержащей документы для изменения. Переменная sAuthorName должна содержать имя замены. Необходимую функцию GetFilesOnMacWithOrWithoutSubfolders можно найти онлайн здесь .
Отказ от ответственности: этот макрос не был протестирован на 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