Como converter comentários em notas de rodapé ou notas de fim no Microsoft Word?
Author: Siluvia Last Modified: 2025-08-06
Suponha que existam vários comentários no seu Documento do Word, como você pode converter todos esses comentários em notas de rodapé ou notas de fim ao mesmo tempo? Este artigo fornece métodos VBA para alcançar isso.
Converter comentários em notas de rodapé ou notas de fim com código VBA
Converter comentários em notas de rodapé ou notas de fim com código VBA
Os códigos VBA abaixo podem ajudá-lo a converter rapidamente todos os comentários no documento atual em notas de rodapé ou notas de fim. Por favor, siga os passos abaixo.
1. Abra o documento que contém os comentários que deseja converter em notas de rodapé ou notas de fim, pressione as teclas Alt + F11 para abrir a janela Microsoft Visual Basic for Applications.
2. Na janela Microsoft Visual Basic for Applications, clique em Inserir > Módulo. Em seguida, copie o código VBA abaixo na janela Módulo.
Código VBA: Converter comentários em notas de rodapé:
Sub ConvertCommentsToFootnotes()
Dim xComm As Comment
Dim xCommRange As Range
Dim xDoc As Document
Application.ScreenUpdating = False
Set xDoc = ActiveDocument
For Each xComm In xDoc.Comments
Set xCommRange = xComm.Range
xDoc.Footnotes.Add xComm.Scope, , xCommRange.Text
xComm.Delete
Next
Application.ScreenUpdating = True
End Sub
Código VBA: Converter comentários em notas de fim:
Sub ConvertCommentsToEndnotes()
Dim xComm As Comment
Dim xCommRange As Range
Dim xDoc As Document
Application.ScreenUpdating = False
Set xDoc = ActiveDocument
For Each xComm In xDoc.Comments
Set xCommRange = xComm.Range
xDoc.Endnotes.Add xComm.Scope, , xCommRange.Text
xComm.Delete
Next
Application.ScreenUpdating = True
End Sub
3. Pressione a tecla F5 para executar o código.
Então, todos os comentários no documento atual são convertidos imediatamente em notas de rodapé ou notas de fim com base no código VBA aplicado.
Artigos relacionados:
Faça Mais em Menos Tempo com o Kutools para Word Aprimorado por IA
O Kutools para Word não é apenas um conjunto de ferramentas - é uma solução inteligente desenvolvida para aumentar sua produtividade. Com recursos impulsionados por IA e os recursos mais essenciais, o Kutools ajuda você a realizar mais em menos tempo:
- Resuma, reescreva, componha e traduza conteúdo instantaneamente.
- Corrija o texto em tempo real com sugestões de gramática, pontuação e estilo enquanto você escreve.
- Reformule e traduza o conteúdo mantendo o layout, estilo e estrutura intactos.
- Traduza seu conteúdo para mais de 40 idiomas facilmente, expandindo seu alcance globalmente.
- Receba ajuda instantânea e insights inteligentes com base no conteúdo do documento atual.
- Pergunte como concluir uma tarefa - como remover quebras de seção - e a IA irá guiá-lo ou fazer isso por você.
- Censure informações sensíveis ou confidenciais em segundos para garantir privacidade total.
- Todas as ferramentas funcionam perfeitamente dentro do Word, sempre ao alcance.
- Crie, refine, traduza, resuma e proteja documentos sem esforço.
- Melhore a gramática, clareza e tom enquanto escreve em tempo real.
- Reformule e traduza o conteúdo sem alterações no layout ou formatação.
- Pergunte como concluir uma tarefa - como remover quebras de seção - e a IA irá guiá-lo ou fazer isso por você.
- Todas as ferramentas funcionam perfeitamente dentro do Word, sempre ao alcance.
Saiba mais sobre o Kutools para Word Baixar Agora
Melhores Ferramentas de Produtividade para Escritório
Kutools para Word – 100+ ferramentas para Word
