Skip to main content

Como exportar o texto do corpo de um email do Outlook para uma planilha do Excel?

Author: Siluvia Last Modified: 2025-06-04

Exportar o texto do corpo de emails do Outlook para uma planilha do Excel pode ser útil para acompanhar informações ou analisar dados dos emails. Este tutorial irá guiá-lo por dois métodos: usando VBA (Visual Basic for Applications) para exportações manuais e o recurso Salvar Emails como Outros Arquivos do Kutools para Outlook, que simplifica o processo.

Exportando Texto do Corpo de Email para o Excel com VBA

Exportação em Massa de Texto do Corpo de Email para o Excel com Kutools para Outlook
Suporta a exportação de várias mensagens e salvá-las como PDF, Excel, HTML ou outros formatos de arquivo.


Exportando Texto do Corpo de Email para o Excel com VBA

Usar o VBA é um método manual para exportar o texto do corpo de um email para uma planilha do Excel. Siga estes passos:

1. Abra o email, selecione o corpo do email que deseja exportar para a planilha do Excel e, em seguida, 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 Código.

Código VBA: exportar texto do corpo de email do Outlook para planilha do Excel

Sub ExportToExcel()
Dim xExcel As Excel.Application
Dim xWb As Workbook
Dim xWs As Worksheet
Dim xInspector As Inspector
Dim xItem As Object
Dim xMailItem As MailItem
Dim xDoc As Document
Dim xShell As Object
Dim xFilePath As String
On Error Resume Next
    Set xShell = CreateObject("Shell.Application")
    Set xFolder = xShell.BrowseForFolder(0, "Select a Folder:", 0, 0)
    If TypeName(xFolder) = "Nothing" Then Exit Sub
    Set xFolderItem = xFolder.Self
    xFilePath = xFolderItem.Path & "\"
    Set xItem = Outlook.Application.ActiveExplorer.Selection.item(1)
    If xItem.Class <> olMail Then Exit Sub
    Set xMailItem = xItem
    Set xInspector = xMailItem.GetInspector
    Set xDoc = xInspector.WordEditor
    xDoc.Application.Selection.Range.Copy
    xInspector.Close olDiscard
    Set xExcel = New Excel.Application
    Set xWb = xExcel.Workbooks.Add
    Set xWs = xWb.Sheets.item(1)
    xExcel.Visible = False
    xWs.Activate
    xWs.Paste
    xWs.SaveAs xFilePath & "Email body.xlsx"
    xWb.Close True
    xExcel.Quit
    Set xWs = Nothing
    Set xWb = Nothing
    Set xExcel = Nothing
End Sub

Observação: No código, “Email body.xlsx” é o nome da pasta de trabalho que você criará com o texto do corpo do email selecionado. Você pode alterá-lo conforme necessário.

3. Clique em Ferramentas > Referências. Em seguida, marque as caixas Microsoft Excel Object Library e Microsoft Word Object Library na caixa de diálogo Referências – Projeto. Veja a captura de tela:

doc-export-body-to-excel-1

4. Em seguida, uma caixa de diálogo Procurar Pasta aparecerá, por favor, selecione uma pasta para salvar a pasta de trabalho e clique no botão OK.

doc-export-body-to-excel-2

Agora, uma pasta de trabalho chamada “Email body” foi criada e salva em uma pasta específica. Ao abrir a pasta de trabalho, você verá que o texto do corpo do email selecionado foi exportado para a Planilha1 da pasta de trabalho.

Assistente de E-mail AI no Outlook: Respostas mais Inteligentes, Comunicação mais Clara (mágica com um clique!) GRÁTIS

Simplifique suas tarefas diárias no Outlook com o Assistente de E-mail AI do Kutools para Outlook. Esta poderosa ferramenta aprende com seus e-mails anteriores para oferecer respostas inteligentes e precisas, otimizar o conteúdo de seus e-mails e ajudá-lo a criar e refinar mensagens sem esforço.
doc ai email handle

Este recurso suporta:

  • Respostas Inteligentes: Receba respostas elaboradas a partir de suas conversas passadas — personalizadas, precisas e prontas para uso.
  • Conteúdo Aprimorado: Refine automaticamente o texto de seus e-mails para maior clareza e impacto.
  • Criação Sem Esforço: Basta fornecer palavras-chave e deixar a IA cuidar do resto, com múltiplos estilos de escrita.
  • Extensões Inteligentes: Expanda seus pensamentos com sugestões contextualizadas.
  • Resumo: Obtenha visões concisas de e-mails longos instantaneamente.
  • Alcance Global: Traduza seus e-mails para qualquer idioma com facilidade.

Este recurso suporta:

  • Respostas inteligentes de e-mail
  • Conteúdo otimizado
  • Rascunhos baseados em palavras-chave
  • Extensão inteligente de conteúdo
  • Resumo de e-mails
  • Tradução multilíngue

O melhor de tudo é que este recurso é completamente grátis para sempre! Não espere — baixe agora o Assistente de E-mail AI e aproveite


Exportação em Massa de Texto do Corpo de Email para o Excel com Kutools para Outlook

Se você prefere um método amigável e que economiza tempo, o Kutools para Outlook oferece um recurso Salvar Emails como Outros Arquivos que permite salvar o texto do corpo do email e outros detalhes em massa.

Kutools para Outlook: Desbloqueie mais de 100 recursos essenciais e avançados! Aproveite mais de 70 recursos gratuitamente. Faça o download e explore a versão gratuita hoje mesmo!

Após instalar o Kutools para Outlook, siga os passos abaixo

Passo 1. Selecione as mensagens das quais deseja exportar os textos do corpo.

Passo 2. Clique em Kutools > Processamento em Massa > Salvar emails selecionados em vários formatos de arquivo como PDF.

click-save-messages-as-files-under-kutools-tab

Passo 3. Na caixa de diálogo Salvar Email como Outros Arquivos,

  1. Selecione uma pasta para colocar os arquivos exportados.

  2. Marque Formato Excel.

  3. Marque Apenas Corpo.

  4. Clique em Ok.

    save-messages-as-files-dialog

Agora, apenas os textos do corpo das mensagens selecionadas são salvos como arquivos Excel separados.

save-result

Melhores Ferramentas de Produtividade para Office

Notícia de Última Hora: Kutools para Outlook Lança Versão Gratuita!

Experimente agora a nova versão GRATUITA do Kutools para Outlook, com mais de70 recursos incríveis para você usar PARA SEMPRE! Clique para baixar agora!

🤖 Kutools AI : Utiliza tecnologia avançada de IA para gerenciar emails com facilidade, incluindo responder, resumir, otimizar, expandir, traduzir e redigir emails.

📧 Automação de Email: Resposta automática (Disponível para POP e IMAP) / Agendar envio de emails / CC/BCC automático por Regra ao enviar email / Encaminhamento automático (Regra avançada) / Adicionar saudação automaticamente / Dividir automaticamente emails com múltiplos destinatários em mensagens individuais...

📨 Gerenciamento de Email: Recallar Email / Bloquear emails suspeitos por assunto e outros critérios / Excluir Emails Duplicados / Pesquisa Avançada / Organizar Pastas...

📁 Anexos Pro: Salvar em lote / Desanexar em lote / Comprimir em lote / Salvar automaticamente / Desanexar automaticamente / Auto Comprimir...

🌟 Interface Mágica: 😊Mais emojis bonitos e estilosos / Aviso quando emails importantes chegarem / Minimizar Outlook ao invés de fechar...

👍 Recursos com Um Clique: Responder a Todos com Anexos / Emails Anti-Phishing / 🕘Exibir o fuso horário do remetente...

👩🏼‍🤝‍👩🏻 Contatos & Calendário: Adicionar contatos em lote a partir de emails selecionados / Dividir um grupo de contatos em grupos individuais / Remover lembrete de aniversário...

Desbloqueie instantaneamente o Kutools para Outlook com um único clique. Não perca tempo, baixe agora e aumente sua produtividade!

kutools for outlook features1 kutools for outlook features2