Comment copier toutes les pièces jointes de plusieurs emails vers un nouvel email dans Outlook ?
Gérer efficacement les pièces jointes des emails dans Outlook peut être difficile, surtout lorsque vous devez extraire des pièces jointes de plusieurs emails et les regrouper dans un nouvel email ou copier toutes les pièces jointes d'un email dans une réponse. Enregistrer manuellement et rattacher les fichiers n'est pas seulement chronophage mais également sujet aux erreurs. Heureusement, il existe deux méthodes efficaces pour simplifier cette tâche. Vous pouvez utiliser VBA pour extraire et insérer des pièces jointes depuis plusieurs emails dans un nouvel email, bien que cela nécessite des connaissances techniques. Cependant, pour une solution plus rapide et sans tracas, l'outil Kutools pour Outlook propose une option en un clic pour copier instantanément toutes les pièces jointes d'un email dans un email de réponse, ce qui en fait le choix le plus efficace et convivial.
Copier toutes les pièces jointes de plusieurs emails vers un nouvel email en utilisant VBA (Manuel et technique)
Copiez toutes les pièces jointes d’un email vers un email de réponse instantanément avec un outil incroyable 👍 (Sans effort et recommandé)
Copier toutes les pièces jointes de plusieurs emails vers un nouvel email en utilisant VBA
Si vous préférez utiliser VBA pour automatiser le processus, vous pouvez suivre ces étapes pour extraire rapidement et copier toutes les pièces jointes de plusieurs emails dans un nouvel email.
Étape 1 : Sélectionner plusieurs emails
Dans Outlook, sélectionnez les emails contenant les pièces jointes que vous souhaitez copier.
- Maintenez la touche "Ctrl" pour sélectionner plusieurs emails non adjacents.
- Maintenez la touche "Shift" pour sélectionner une plage d’emails adjacents.
Étape 2 : Ouvrir l'éditeur VBA
Appuyez sur "Alt" + "F11" pour ouvrir la fenêtre "Microsoft Visual Basic for Applications".
Étape 3 : Insérer le code VBA dans un nouveau module
Cliquez sur "Insérer" > "Module" pour créer un nouveau module. Et collez le code VBA suivant dans la fenêtre du module :
VBA : Copier toutes les pièces jointes de plusieurs emails vers un nouvel email
Sub NewEmailInsertAttachmentsName()
Dim xSelection As Outlook.Selection
Dim xMailItem As Outlook.MailItem
Dim xAttachment As Outlook.Attachment
Dim xFSO As Object
Dim xFldPath As String
Dim xFilePath As String
Dim xNewMail As Outlook.MailItem
On Error Resume Next
Set xSelection = Outlook.Application.ActiveExplorer.Selection
Set xNewMail = Outlook.Application.CreateItem(olMailItem)
Set xFSO = CreateObject("Scripting.FileSystemObject")
xFldPath = xFSO.GetSpecialFolder(2).Path & "\MyAttachments"
If xFSO.FolderExists(xFldPath) = False Then
xFSO.CreateFolder (xFldPath)
End If
For Each xMailItem In xSelection
For Each xAttachment In xMailItem.Attachments
xFilePath = xFldPath & "\" & xAttachment.FileName
xAttachment.SaveAsFile (xFilePath)
xNewMail.Attachments.Add (xFilePath)
xFSO.DeleteFile (xFilePath)
Next
Next
xFSO.GetFolder(xFldPath).Delete
xNewMail.Display
End Sub
Étape 4 : Exécuter le code VBA
Appuyez sur "F5" ou cliquez sur le bouton Exécuter pour lancer le code. Un nouvel email s'ouvrira, contenant toutes les pièces jointes extraites des emails sélectionnés.
Inconvénients :
- ❌ Nécessite des connaissances en VBA : Pas convivial pour les débutants et implique de travailler avec du code.
- ❌ Configuration manuelle requise : Vous devez ouvrir l'éditeur VBA, insérer le code et l'exécuter à chaque fois.
- ❌ Restrictions de sécurité potentielles : Certaines versions d'Outlook bloquent les macros en raison des politiques de sécurité.
- ❌ Aucune flexibilité : Vous devez relancer le script chaque fois que vous avez besoin de copier à nouveau des pièces jointes.
📂 Enregistrez facilement les pièces jointes de plusieurs emails
Fatigué(e) d'enregistrer les pièces jointes un email à la fois dans Outlook ? Rationalisez votre flux de travail avec Kutools pour Outlook ! La puissante fonctionnalité Enregistrer toutes les pièces jointes vous permet de sauvegarder les pièces jointes de plusieurs emails ou de dossiers entiers en quelques clics seulement. Dites adieu aux processus manuels fastidieux et gérez votre boîte de réception sans effort.
Copiez toutes les pièces jointes d’un email vers un email de réponse instantanément avec un outil incroyable 👍
Pour une solution plus simple et plus rapide, vous pouvez utiliser la fonction Répondre avec la pièce jointe d’origine dans "Kutools pour Outlook". Cette méthode vous permet de copier toutes les pièces jointes d’un email directement dans un email de réponse en un seul clic - pas besoin de VBA ni de copie manuelle des pièces jointes.
Dites adieu à l'inefficacité d'Outlook ! Kutools pour Outlook facilite le traitement par lots des e-mails - désormais avec des fonctionnalités gratuites alimentées par l'IA ! Téléchargez Kutools pour Outlook dès maintenant !!
1. Dans la vue Mail, sélectionnez l'email auquel vous souhaitez répondre. Ensuite, cliquez sur "Kutools" > "Répondre avec la pièce jointe d'origine ou Répondre à tous avec la pièce jointe d'origine".
2. Maintenant, toutes les pièces jointes de l'email sélectionné sont automatiquement copiées dans l'email de réponse.
Avantages de la méthode Kutools pour Outlook :
- ✅ Pas de copie ni collage manuel : Fonctionne instantanément en un clic.
- ✅ Pas besoin de coder en VBA : Convivial et sans tracas.
- ✅ Gain de temps : Réduit considérablement l'effort par rapport aux méthodes manuelles.
- ✅ Compatible avec toutes les versions d'Outlook : Pas de restrictions de macro ni d'avertissements de sécurité.
Articles connexes
Comment copier une pièce jointe vers un autre email dans Outlook ?
Meilleurs outils de productivité pour Office
Dernière nouvelle : Kutools pour Outlook lance sa version gratuite !
Découvrez le tout nouveau Kutools pour Outlook avec plus de100 fonctionnalités incroyables ! Cliquez pour télécharger dès maintenant !
📧 Automatisation des E-mails : Réponse automatique (disponible pour POP et IMAP) / Programmer l’envoi d’un e-mail / CC/BCC automatique par règle lors de l’envoi / Transfert automatique (règle avancée) / Ajouter automatiquement une salutation / Diviser automatiquement les e-mails multi-destinataires en messages individuels ...
📨 Gestion des E-mails : Rappeler lemail / Bloquer les e-mails frauduleux par objet et autres critères / Supprimer les doublons / Recherche Avancée / Organiser les dossiers ...
📁 Pièces jointes Pro : Enregistrement en lot / Détachement en lot / Compression en lot / Enregistrer automatiquement / Détachement automatique / Compression automatique ...
🌟 Interface magique : 😊Plus d’emojis élégants et amusants / Vous rappelle lorsque des e-mails importants arrivent / Réduire Outlook au lieu de fermer ...
👍 Fonctions en un clic : Répondre à tous avec pièces jointes / E-mails anti-phishing / 🕘Afficher le fuseau horaire de l’expéditeur ...
👩🏼🤝👩🏻 Contacts & Calendrier : Ajouter en lot des contacts à partir des e-mails sélectionnés / Diviser un groupe de contacts en groupes individuels / Supprimer le rappel d’anniversaire ...
Utilisez Kutools dans votre langue préférée – prend en charge l’Anglais, l’Espagnol, l’Allemand, le Français, le Chinois et plus de40 autres !
🚀 Téléchargement en un clic — Obtenez tous les compléments Office
Recommandé vivement : Kutools pour Office (5-en-1)
Un clic pour télécharger cinq installateurs en une seule fois — Kutools pour Excel, Outlook, Word, PowerPoint et Office Tab Pro. Cliquez pour télécharger dès maintenant !
- ✅ Praticité en un clic : téléchargez les cinq packages d’installation en une seule action.
- 🚀 Prêt pour toutes les tâches Office : installez les compléments dont vous avez besoin, quand vous en avez besoin.
- 🧰 Inclus : Kutools pour Excel / Kutools pour Outlook / Kutools pour Word / Office Tab Pro / Kutools pour PowerPoint