Como posso converter automaticamente todos os comentários em um documento do Word 2010 para notas de rodapé?

5

Comecei a escrever comentários em algum texto na palavra 2010, e escrevi tantos que eles não se encaixam na página. Eu quero convertê-los em notas de rodapé para que eles saiam bem na impressão. Existe alguma maneira de converter comentários em notas de rodapé sem fazer notas de rodapé uma de cada vez?

    
por Nathan Fellman 06.07.2010 / 21:41

1 resposta

4

AFAIK não tem funcionalidade embutida, mas é uma tarefa fácil para uma macro VBA (que eu encontrei aqui ):

    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

Isto irá inserir notas de rodapé para cada comentário, copiando o texto do comentário e removendo o comentário depois.

    
por 31.08.2011 / 14:03