Comment conserver les pièces jointes lors de la réponse dans Outlook?

Auteur : Kelly Dernière modification: 2024-08-22

Lorsque nous transférons un message électronique dans Microsoft Outlook, les pièces jointes d'origine de ce message électronique sont conservées dans le message transféré. Cependant, lorsque nous répondons à un e-mail, les pièces jointes d'origine ne seront pas jointes au nouveau message de réponse. Ici, nous allons présenter quelques astuces pour conserver les pièces jointes d'origine lors de la réponse dans Microsoft Outlook.

Répondre avec des pièces jointes en copiant et collant manuellement

Répondre automatiquement avec des pièces jointes par VBA

/ a>Un clic pour répondre avec des pièces jointes avec Kutools for Outlook Démonstration

Répondre avec des pièces jointes en copiant et collant manuellement

Nous pouvons copier manuellement les pièces jointes originales dans un e-mail et les coller dans la fenêtre Message de réponse lorsque nous répondrons ultérieurement au message électronique.

Étape 1: cliquez sur le message électronique pour en afficher un aperçu dans le volet de lecture.

Étape 2: Cliquez avec le bouton droit sur une pièce jointe dans le message électronique de prévisualisation et sélectionnez le Sélectionner tout dans le menu contextuel.

Étape 3: Faites un clic droit sur les pièces jointes sélectionnées et sélectionnez le Copier dans le menu contextuel.

la capture d'écran de l'étape concernant la réponse avec les pièces jointes en copiant et collant manuellement 1

Étape 4: Répondez au message électronique en cliquant sur le bouton Répondre bouton sur la Accueil onglet (ou sur la barre d'outils dans Outlook 2007).

la capture d'écran de l'étape concernant la réponse avec les pièces jointes en copiant et collant manuellement 2

Étape 5: Dans la fenêtre de réponse au message, cliquez sur l'icône pâtes bouton sur la Contacter onglet pour coller ces pièces jointes.

la capture d'écran de l'étape concernant la réponse avec les pièces jointes en copiant et collant manuellement 3

Si vous utilisez Outlook 2013 ou une version ultérieure, cliquez sur l'icône Sortir dans le coin supérieur gauche du volet de lecture pour libérer la fenêtre de message de réponse. Cliquez pour en savoir plus…

Étape 6: Composez le message de réponse et cliquez sur le bouton Envoyer .

AI Mail Assistant dans Outlook : réponses plus intelligentes, communication plus claire (magie en un clic !) un devis GRATUIT

Rationalisez vos tâches Outlook quotidiennes avec l'assistant AI Mail de Kutools for Outlook. Cet outil puissant apprend de vos e-mails passés pour offrir des réponses intelligentes et précises, optimiser le contenu de vos e-mails et vous aider à rédiger et affiner vos messages sans effort.

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 à l'emploi.
Contenu amélioré : affinez automatiquement le texte de votre e-mail pour plus de clarté et d'impact.
Composition sans effort : fournissez simplement des mots-clés et laissez l'IA gérer le reste, avec plusieurs styles d'écriture.
Extensions intelligentes : développez vos idées avec des suggestions contextuelles.
Récapitulatif : obtenez instantanément des aperçus concis des longs e-mails.
Portée mondiale : traduisez facilement vos e-mails dans n’importe quelle langue.

Cette fonctionnalité prend en charge :

Réponses intelligentes par e-mail
Contenu optimisé
Brouillons basés sur des mots clés
Extension de contenu intelligente
Résumé par e-mail
Traduction multilingue

Mieux encore, cette fonctionnalité est complètement gratuitement pour toujours! N'attendez pas—téléchargez AI Mail Assistant maintenant et profitez-en!

Répondre automatiquement avec des pièces jointes par VBA

Il existe une macro VBA qui peut vous aider à répondre automatiquement avec les pièces jointes d'origine.

Remarque: avant d'exécuter des macros VBA, vous devez activer les macros dans Microsoft Outlook.

Étape 1: Sélectionnez le message électronique auquel vous répondrez avec ses pièces jointes.

Étape 2: appuyez sur le autre + F11 touches pour ouvrir la fenêtre Microsoft Visual Basic pour Applications.

Étape 3: développez les objets Project1 et Microsoft Outlook dans la barre de gauche et double-cliquez sur le Cette session Outlook pour l'ouvrir.

la capture d'écran de l'étape concernant la réponse avec les pièces jointes par vba 1

Étape 4: collez le code suivant dans la fenêtre ThisOutlookSession.

Sub RunReplyWithAttachments()
'Update by Extendoffice 20180830
    Dim xReplyItem As Outlook.MailItem
    Dim xItem As Object
    On Error Resume Next
    Set xItem = GetCurrentItem()
    If xItem Is Nothing Then Exit Sub
    Set xReplyItem = xItem.Reply
    CopyAttachments xItem, xReplyItem
    xReplyItem.Display
    Set xReplyItem = Nothing
    Set xItem = Nothing
End Sub
Sub RunReplyAllWithAttachments()
    Dim xReplyAllItem As Outlook.MailItem
    Dim xItem As Object
    Set xItem = GetCurrentItem()
    If xItem Is Nothing Then Exit Sub
    Set xReplyAllItem = xItem.ReplyAll
    CopyAttachments xItem, xReplyAllItem
    xReplyAllItem.Display
    Set xReplyAllItem = Nothing
    Set xItem = Nothing
End Sub
    
Function GetCurrentItem() As Object
    On Error Resume Next
    Select Case TypeName(Application.ActiveWindow)
        Case "Explorer"
            Set GetCurrentItem = Application.ActiveExplorer.Selection.Item(1)
        Case "Inspector"
            Set GetCurrentItem = Application.ActiveInspector.currentItem
    End Select
End Function
    
Sub CopyAttachments(SourceItem As MailItem, TargetItem As MailItem)
    Dim xFilePath As String
    Dim xAttachment As Attachment
    Dim xFSO As Scripting.FileSystemObject
    Dim xTmpFolder As Scripting.Folder
    Dim xFldPath As String
    Set xFSO = New Scripting.FileSystemObject
    Set xTmpFolder = xFSO.GetSpecialFolder(2)
    xFldPath = xTmpFolder.Path & "\"
    For Each xAttachment In SourceItem.Attachments
        If IsEmbeddedAttachment(xAttachment) = False Then
            xFilePath = xFldPath & xAttachment.Filename
            xAttachment.SaveAsFile xFilePath
            TargetItem.Attachments.Add xFilePath, , , xAttachment.DisplayName
            xFSO.DeleteFile xFilePath
        End If
    Next
    Set xFSO = Nothing
    Set xTmpFolder = Nothing
End Sub

Function IsEmbeddedAttachment(Attach As Attachment)
    Dim xAttParent As Object
    Dim xCID As String, xID As String
    Dim xHTML As String
    On Error Resume Next
    Set xAttParent = Attach.Parent
    xCID = ""
    xCID = Attach.PropertyAccessor.GetProperty("http://schemas.microsoft.com/mapi/proptag/0x3712001F")
    If xCID <> "" Then
        xHTML = xAttParent.HTMLBody
        xID = "cid:" & xCID
        If InStr(xHTML, xID) > 0 Then
            IsEmbeddedAttachment = True
        Else
            IsEmbeddedAttachment = False
        End If
    End If
End Function

Étape 5: appuyez sur le F5 clé pour exécuter cette macro. Dans l'ouverture Macros boîte de dialogue, cliquez sur ExécuterReplyAllWithAttachments si vous souhaitez répondre à tous avec des pièces jointes. Sinon, sélectionnez ExécuterRépondreAvec les pièces jointes, puis cliquez sur le Courir .

Ensuite, il ouvre la fenêtre du message de réponse en joignant toutes les pièces jointes d'origine.

Étape 6: rédigez le message de réponse et cliquez sur Envoyer .

Répondez automatiquement avec les pièces jointes avec Kutools for Outlook

La Répondre avec Joindre utilité de Kutools for Outlook peut vous aider à répondre aux e-mails avec des pièces jointes originales en un seul clic.

1. Sélectionnez l'e-mail contenant les pièces jointes auxquelles vous devez répondre.

2. Puis clique Kutools > Répondre avec pièce jointe > Répondre avec pièce jointe. Voir la capture d'écran:

la capture d'écran de l'étape concernant la réponse avec les pièces jointes par kutools pour Outlook 1

Ensuite, toutes les pièces jointes de l'e-mail sélectionné sont répertoriées dans le Attached champ du message de réponse. Composez votre e-mail et envoyez-le.

la capture d'écran de l'étape concernant la réponse avec les pièces jointes par kutools pour Outlook 2

Si vous souhaitez avoir un essai gratuit de cet utilitaire, rendez-vous sur télécharger gratuitement le logiciel d'abord, puis appliquez l'opération selon les étapes ci-dessus.

Un clic pour répondre avec des pièces jointes avec Kutools for Outlook

Meilleurs outils de productivité bureautique

Dernières nouvelles : lancement de Kutools pour Outlook Version gratuite!

Découvrez le tout nouveau Kutools pour Outlook Version GRATUITE avec plus de 70 fonctionnalités incroyables, à utiliser POUR TOUJOURS! Cliquez pour télécharger maintenant!

🤖 Kutools IA : Utilise une technologie d'IA avancée pour gérer les e-mails sans effort, notamment en répondant, en résumant, en optimisant, en prolongeant, en traduisant et en composant des e-mails.

📧 Email Automation: Réponse automatique (disponible pour POP et IMAP) / Programmer l'envoi d'e-mails / Auto CC/BCC par règles lors de l'envoi d'un e-mail / Transfert automatique (règles avancées) / Ajouter un message d'accueil automatique / Divisez automatiquement les e-mails multi-destinataires en messages individuels

(I.e. Email Management: Rappel des e-mails / Bloquer les e-mails frauduleux par sujets et autres / Supprimer les e-mails en double / Recherche Avancée / Consolider les dossiers

(I.e. Pièces jointes Pro: Sauvegarde par lots / Détachement par lots / Compression par lots / Enregistrement automatique / Détachement automatique / Compression automatique

???? Magie de l'interface: 😊Plus d'émojis jolis et cool / Vous rappeler lorsque des e-mails importants arrivent / Réduire Outlook au lieu de fermer

???? Merveilles en un clic: Répondre à tous avec les pièces jointes entrantes / E-mails anti-hameçonnage / 🕘Afficher le fuseau horaire de l'expéditeur

👩🏼‍🤝‍👩🏻 Contacts et calendrier: Ajouter par lots des contacts à partir des e-mails sélectionnés / Diviser un groupe de contacts en groupes individuels / Supprimer les rappels d'anniversaire

Déverrouillez instantanément Kutools pour Outlook en un seul clic :gratuit en permanence. N'attendez pas, téléchargez maintenant et augmentez votre efficacité !