AFAIK нет встроенной функциональности, но это простая задача для макроса VBA (который я нашел здесь ):
Sub comment2footnote() Application.ScreenUpdating = False Dim oDoc As Document, oComment As Comment Set oDoc = ActiveDocument For Each oComment In ActiveDocument.Comments oDoc.Footnotes.Add Range:=oComment.Scope, Text:=oComment.Range.Text oComment.Delete Next Application.ScreenUpdating = True End Sub
Это вставит сноски для каждого комментария, скопирует текст комментария и удалит комментарий впоследствии.