Como exportar comentários do Excel para o Word?
Para utilizadores do Excel, inserir comentários nas células é uma tarefa comum. Por vezes, surge a necessidade de copiar esses comentários para um documento do Word com uma finalidade específica. Embora seja possível copiá-los e colá-los um a um no Word, trata-se de um processo tedioso e demorado. Será que existe uma forma de exportar todos os comentários do Excel para o Word de uma só vez?
Exportar Comentários do Planilha Atual para o Word com código VBA
Exportar Comentários do Planilha Atual para o Word com código VBA
Infelizmente, o Excel não oferece uma funcionalidade nativa para copiar e colar todos os comentários diretamente para o Word de uma só vez. No entanto, com o seguinte código VBA, pode exportar rapidamente todos os comentários da folha de cálculo ativa para um documento do Word.
1. Mantenha premidas as teclas ALT + F11 para abrir a janela do 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 do 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, prima a tecla F5 para executar este código e todos os comentários da folha de cálculo ativa serão exportados para um novo documento do Word, juntamente com o respetivo endereço de célula. Veja a imagem:
Artigos relacionados:
Como inserir rapidamente um comentário em várias células no Excel?
Como alterar o formato da caixa de comentário no Excel?
Como alterar o formato de todos os comentários nas células no Excel?
Como alterar o nome do autor de todos os comentários no Excel?
As Melhores Ferramentas de Produtividade para o Office
Potencie as suas competências no Excel com Kutools para Excel e experimente uma eficiência como nunca antes.Kutools para Excel Oferece mais de 300 funcionalidades avançadas para impulsionar a produtividade e Economizar Tempo.Clique aqui para obter a funcionalidade de que mais precisa...
Office Tab Traz uma interface com separadores para o Office e torna o seu trabalho muito mais fácil
- Ative a edição e leitura com separadores no Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
- Abra e crie vários documentos em novos separadores da mesma janela, em vez de em janelas separadas.
- Aumente a sua produtividade em 50 % e elimine centenas de cliques do rato todos os dias!
Todos os suplementos Kutools — num único instalador.
Kutools for Office reúne suplementos para Excel, Word, Outlook e PowerPoint, além do Office Tab Pro, sendo a solução ideal para equipas que trabalham em várias aplicações do Office.
- Pacote tudo-em-um— suplementos para Excel, Word, Outlook e PowerPoint + Office Tab Pro
- Um instalador, uma licença— configuração em minutos (pronto para MSI)
- Funciona melhor em conjunto— produtividade simplificada em todas as aplicações do Office
- Teste gratuito de 30 dias com todas as funcionalidades— sem registo, sem cartão de crédito
- Melhor relação qualidade-preço— poupe face à compra individual dos suplementos