Accéder au contenu principal

Comment exporter le texte du corps d'un email Outlook vers une feuille de calcul Excel ?

Author: Siluvia Last Modified: 2025-08-06

L'exportation du texte du corps des emails depuis Outlook vers une feuille de calcul Excel peut être utile pour suivre les informations ou analyser les données contenues dans les emails. Ce tutoriel vous guidera à travers deux méthodes : l'utilisation de VBA (Visual Basic for Applications) pour des exportations manuelles et la fonction Enregistrer les messages sous d'autres fichiers de Kutools pour Outlook, qui simplifie le processus.

Exporter le texte du corps d'un email vers Excel avec VBA

Exporter en masse le texte du corps d'un email vers Excel avec Kutools pour Outlook
Prend en charge l'exportation de plusieurs messages et leur sauvegarde au format PDF, Excel, HTML ou autres formats de fichiers.


Exporter le texte du corps d'un email vers Excel avec VBA

L'utilisation de VBA est une méthode manuelle pour exporter le texte du corps d'un email vers une feuille de calcul Excel. Suivez ces étapes :

1. Ouvrez l'email, sélectionnez le corps de l'email que vous souhaitez exporter vers la feuille de calcul Excel, puis appuyez sur les touches Alt + F11 pour ouvrir la fenêtre Microsoft Visual Basic for Applications.

2. Dans la fenêtre Microsoft Visual Basic for Applications, cliquez sur Insérer > Module. Ensuite, copiez le code VBA ci-dessous dans la fenêtre Code.

Code VBA : exporter le texte du corps d'un email Outlook vers une feuille de calcul 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

Remarque : Dans le code, « Email body.xlsx » est le nom du classeur que vous créerez avec le texte du corps de l'email sélectionné. Vous pouvez le modifier selon vos besoins.

3. Cliquez sur Outils > Références. Cochez ensuite les cases Bibliothèque d'objets Microsoft Excel et Bibliothèque d'objets Microsoft Word dans la boîte de dialogue Références – Projet. Voir capture d'écran :

doc-export-body-to-excel-1

4. Une boîte de dialogue Parcourir le dossier apparaît, veuillez sélectionner un dossier pour enregistrer le classeur et cliquer sur le bouton OK.

doc-export-body-to-excel-2

Un classeur nommé « Email body » est maintenant créé et enregistré dans un dossier spécifié. Ouvrez le classeur, vous pouvez voir que le texte du corps de l'email sélectionné a été exporté vers Feuil1 du classeur.

Assistant de messagerie IA dans Outlook : Réponses plus intelligentes, communication plus claire (magie en un clic !) GRATUIT

Rationalisez vos tâches quotidiennes dans Outlook avec l'Assistant de messagerie IA de Kutools pour Outlook. Cet outil puissant apprend de vos anciens emails pour offrir des réponses intelligentes et précises, optimiser le contenu de vos emails et vous aider à rédiger et affiner vos messages sans effort.
doc ai email handle

Cette fonctionnalité prend en charge :

  • Réponses intelligentes : Obtenez des réponses élaborées à partir de vos conversations passées — personnalisées, précises et prêtes à être envoyées.
  • Contenu amélioré : Affinez automatiquement votre texte d'email pour plus de clarté et d'impact.
  • Rédaction sans effort : Fournissez simplement des mots-clés, et laissez l'IA faire le reste, avec plusieurs styles d'écriture.
  • Extensions intelligentes : Développez vos idées avec des suggestions sensibles au contexte.
  • Résumé : Obtenez des aperçus concis des longs emails instantanément.
  • Rayonnement mondial : Traduisez vos emails dans n'importe quelle langue facilement.

Cette fonctionnalité prend en charge :

  • Réponses intelligentes aux emails
  • Contenu optimisé
  • Brouillons basés sur des mots-clés
  • Extension de contenu intelligente
  • Résumé d'email
  • Traduction multilingue

Le meilleur de tout, cette fonctionnalité est entièrement gratuite pour toujours ! Ne tardez pas — téléchargez dès maintenant l'Assistant de messagerie IA et profitez-en


Exporter en masse le texte du corps d'un email vers Excel avec Kutools pour Outlook

Si vous préférez une méthode conviviale et qui fait gagner du temps, Kutools pour Outlook propose une fonctionnalité Enregistrer les messages sous d'autres fichiers qui vous permet d'enregistrer en masse le texte du corps des emails et d'autres détails.

Kutools pour Outlook : Découvrez plus de 100 fonctionnalités essentielles et avancées ! Profitez de plus de 70 fonctionnalités gratuitement. Téléchargez et explorez la version gratuite dès aujourd'hui !

Après avoir installé Kutools pour Outlook, veuillez suivre les étapes ci-dessous.

Étape 1. Sélectionnez les messages dont vous souhaitez exporter les textes du corps.

Étape 2. Cliquez sur Kutools > Traitement en Masse > Enregistrer les e-mails sélectionnés sous différents formats comme PDF.

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

Étape 3. Dans la boîte de dialogue Enregistrer les messages sous d'autres fichiers,

  1. Sélectionnez un dossier pour placer les fichiers exportés.

  2. Cochez Format Excel.

  3. Cochez Corps uniquement.

  4. Cliquez sur OK.

    save-messages-as-files-dialog

Maintenant, seuls les textes du corps des messages sélectionnés sont enregistrés sous forme de fichiers Excel distincts.

save-result

Meilleurs outils de productivité pour Office

Dernière nouvelle : Kutools pour Outlook lance une version gratuite !

Découvrez le tout nouveau Kutools pour Outlook avec plus de100 fonctionnalités incroyables ! Cliquez pour télécharger dès maintenant !

🤖 Kutools IA : Utilise une technologie avancée d’intelligence artificielle pour gérer vos emails en toute simplicité, notamment répondre, résumer, optimiser, étendre, traduire et rédiger des emails.

📧 Automatisation des emails : Réponse automatique (disponible pour POP et IMAP) / Programmation de l’envoi des emails / CC/BCC automatique selon des règles lors de l’envoi / Transfert automatique (Règle avancée) / Ajout automatique de la salutation / Fractionnement automatique des emails multi-destinataires en messages individuels...

📨 Gestion des emails : Rappeler les emails / Bloquer les emails frauduleux par sujet et autres critères / Supprimer les emails en double / Recherche Avancée / Organiser les dossiers...

📁 Pièces jointes Pro:Enregistrer par lot / Détachement par lot / Compression par lot / Enregistrer automatiquement/ Détachement automatique/Compression automatique...

🌟 Magie de l’interface : 😊Davantage d’emojis beaux et sympas / Recevez une alerte en cas d’email important / Réduisez Outlook au lieu de le fermer...

👍 Fonctions en un clic : Répondre à tous avec pièces jointes / Anti-phishing emails / 🕘Afficher le fuseau horaire de l’expéditeur...

👩🏼‍🤝‍👩🏻 Contacts & Calendrier: Ajouter des contacts en lot à partir des emails sélectionnés / Diviser un groupe de contacts en groupes individuels / Supprimer le rappel d’anniversaire...

Utilisez Kutools dans la langue de votre choix– prend en charge l’anglais, l’espagnol, l’allemand, le français, le chinois, et plus de40 autres langues !

Débloquez instantanément Kutools pour Outlook en un seul clic. N’attendez plus, téléchargez maintenant et augmentez votre productivité !

kutools for outlook features1 kutools for outlook features2