Como exportar comentários do Excel para o Word?

Para os usuários do Excel, inserir comentários nas células é uma tarefa comum. Às vezes, você precisa copiar e colar esses comentários em um documento do Word para algum propósito específico. Claro, você pode copiar e colar os comentários no Word um por um, mas isso é um trabalho tedioso e demorado. Existe alguma maneira de exportar todos os comentários do Excel para o Word de uma só vez?

Exportar comentários da planilha atual para o Word com código VBA

Exportar comentários da planilha atual para o Word com código VBA

Infelizmente, o Excel não oferece a função de copiar e colar todos os comentários no Word de uma só vez. No entanto, com o seguinte código VBA, você pode exportar rapidamente todos os comentários da planilha ativa para o documento do Word.

1. Pressione e segure as teclas ALT + F11 para abrir a janela Microsoft Visual Basic for Applications.

2. Clique em Inserir > Módulo e cole o seguinte código na Janela do Módulo.

Código VBA: Exportar comentários da planilha atual para o Word

Sub CopyCommentsToWord()
'Update 20140325
Dim xComment As Comment
Dim wApp As Object
On Error Resume Next
Set wApp = GetObject(, "Word.Application")
If Err.Number <> 0 Then
  Err.Clear
  Set wApp = CreateObject("Word.Application")
End If
wApp.Visible = True
wApp.Documents.Add DocumentType:=0
For Each xComment In Application.ActiveSheet.Comments
    wApp.Selection.TypeText xComment.Parent.Address & vbTab & xComment.Text
    wApp.Selection.TypeParagraph
Next
Set wApp = Nothing
End Sub

3. Em seguida, pressione a tecla F5 para executar este código, e todos os comentários na planilha ativa serão exportados para um novo documento do Word com seu endereço de célula. Veja a captura de tela:

Artigos relacionados:

Como inserir rapidamente um comentário em várias células no Excel?

Como alterar o formato da caixa de comentários no Excel?

Como alterar todos os formatos de comentários nas células no Excel?

Como alterar o nome do autor de todos os comentários no Excel?