Comment créer automatiquement le nom du destinataire lors de la réponse à un message dans Outlook ?

Lorsque vous répondez à des emails dans Outlook, il est courant de commencer par une salutation polie telle que « Cher John », suivie d'un message comme « Bonjour ! ». Cependant, taper cela manuellement à chaque fois peut être fastidieux et chronophage. Ce tutoriel présente deux méthodes efficaces pour insérer automatiquement le nom de l'expéditeur et une salutation lorsque vous répondez aux messages dans Outlook :

Méthode 1 : Ajouter automatiquement des salutations avec VBA lors de la réponse aux emails (Flexible mais configuration manuelle)

Méthode 2 : Ajouter automatiquement une salutation lors de la réponse ou du transfert avec Kutools for Outlook 👍 (Rapide & Facile)

Méthode 1 : Ajouter automatiquement des salutations avec VBA lors de la réponse aux emails

Le code VBA suivant vous aide à insérer automatiquement une salutation personnalisée (par exemple, "Cher John, Bonjour !") dans le corps du message de réponse en fonction de l'heure de la journée.

Étape 1 : Ouvrir l'éditeur VBA dans Outlook

1. Appuyez sur Alt + F11 pour ouvrir la fenêtre Microsoft Visual Basic pour Applications.

2. Dans le volet gauche sous "Projet1 (VbaProject.OTM)", développez "Microsoft Outlook Objects" et double-cliquez sur "ThisOutlookSession".

Étape 2 : Insérer le code VBA

Copiez et collez le code VBA suivant dans l'éditeur :

Public WithEvents GExplorer As Outlook.Explorer
Public WithEvents GMailItem As Outlook.MailItem

Private Sub Application_Startup()
    Set GExplorer = Outlook.Application.ActiveExplorer
End Sub

Private Sub GExplorer_SelectionChange()
    Dim xItem As Object
    On Error Resume Next
    Set xItem = GExplorer.Selection.Item(1)
    If xItem.Class <> olMail Then Exit Sub
    Set GMailItem = xItem
End Sub

Private Sub GMailItem_Reply(ByVal Response As Object, Cancel As Boolean)
    AutoAddGreetingToReply Response
End Sub

Private Sub GMailItem_ReplyAll(ByVal Response As Object, Cancel As Boolean)
    AutoAddGreetingToReply Response
End Sub

Sub AutoAddGreetingToReply(Item As Object)
    Dim xGreetStr As String
    Dim xReplyMail As MailItem
    Dim xSenderName As String
    Dim xRecipient As Recipient
    On Error Resume Next
    If Item.Class <> olMail Then Exit Sub
    Set xReplyMail = Item
    For Each xRecipient In xReplyMail.Recipients
        If xSenderName = "" Then
            xSenderName = xRecipient.Name
        Else
            xSenderName = xSenderName & "," & xRecipient.Name
        End If
    Next xRecipient
    Select Case Time
           Case 0.3 To 0.5
                xGreetStr = " Good morning!"
           Case 0.5 To 0.75
                xGreetStr = " Good afternoon!"
           Case Else
                xGreetStr = " Good evening!"
    End Select
    With xReplyMail
        .Display
        .HTMLBody = "Dear " & xSenderName & "," & xGreetStr & "" & .HTMLBody
    End With
End Sub

Étape 3 : Enregistrer le code VBA et redémarrer Outlook

1. Appuyez sur Ctrl + S pour enregistrer le projet.

2. Fermez l'éditeur VBA et redémarrez Outlook pour que le code prenne effet.

Résultat :

Dès que vous répondez à un email, Outlook insérera automatiquement une salutation en haut du corps du message.

---

📅 Insérer automatiquement la date dans l'objet ou la signature en un instant !

Fatigué de devoir ajouter manuellement des dates aux emails ? Avec Kutools pour Outlook, vous pouvez insérer automatiquement la date actuelle dans l'objet de l'email ou la signature à chaque fois que vous composez, répondez ou transférez un message. Réglez-le une fois, et laissez Kutools faire le reste ! 🚀

💡 Astuce rapide : Cliquez sur Kutools > Options, puis activez l'insertion de la date dans les signatures ou les objets.

✅ Insérer automatiquement la date dans les signatures
✅ Ajouter automatiquement la date aux lignes d'objet

✅ Format de date personnalisé
✅ Fonctionne sur les nouveaux emails et les réponses

🔥 Essayez Kutools pour Outlook – GRATUIT !

Méthode 2 : Ajouter automatiquement une salutation lors de la réponse ou du transfert avec Kutools for Outlook 👍

Si vous recherchez une approche plus rapide et sans code, "Kutools for Outlook" propose une fonctionnalité de salutation intégrée qui ajoute automatiquement le nom de l'expéditeur avec une salutation lors de la réponse ou du transfert des emails.

1. Cliquez sur "Kutools" > "Options" pour ouvrir la boîte de dialogue "Options".

2. Dans la boîte de dialogue "Options", configurez ce qui suit :

1. 1). Allez dans l'onglet "Réponse".
2. 2). Cochez l'option "Ajouter une salutation lors de la création, réponse et transfert d'un email". Par défaut, il affichera Salut <<SenderName>>, dans la zone.
⚡ Astuce : Vous pouvez remplacer la salutation par votre propre texte et la personnaliser en utilisant des codes de noms automatiques comme <<FirstName>>, <<LastName>>, ou <<SenderName>> pour insérer le nom du destinataire selon vos besoins.
3. 3). Cliquez sur OK pour enregistrer les paramètres.

📌 Résultat : Désormais, chaque fois que vous répondez ou transférez un email, Kutools insérera automatiquement une salutation au début du corps du message.

Quelle méthode devriez-vous utiliser ?

Voici une comparaison rapide des deux méthodes pour vous aider à choisir celle qui convient le mieux à vos besoins :

Recommandation finale :
Si vous êtes à l'aise avec VBA et avez besoin d'un contrôle avancé sur le contenu de la salutation, la méthode 1 est un bon choix. Mais pour la plupart des utilisateurs, la méthode 2 avec Kutools for Outlook est la manière la plus simple et la plus efficace d'ajouter automatiquement des salutations avec une configuration minimale et sans codage.

---

Meilleurs outils de productivité pour Office

Dernières nouvelles : Kutools pour Outlook lance une version gratuite !

Découvrez la toute nouvelle version GRATUITE de Kutools pour Outlook avec plus de70 fonctionnalités incroyables, à utiliser POUR TOUJOURS ! Cliquez pour télécharger maintenant !

🤖 Kutools IA : Utilise une technologie IA avancée pour gérer les emails sans effort, y compris répondre, résumer, optimiser, étendre, traduire et composer des emails.

📧 Automatisation des emails : Réponse automatique (Disponible pour POP et IMAP) / Programmation d'envoi d'emails / CC/BCC automatique par règle lors de l'envoi d'un email / Transfert automatique (Règle avancée) / Ajouter automatiquement une salutation / Diviser automatiquement les emails multi-destinataires en messages individuels...

📨 Gestion des emails : Rappeler les emails / Bloquer les emails frauduleux par sujets et autres / Supprimer les emails en double / Recherche avancée / Organiser les dossiers...

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

🌟 Magie de l'interface : 😊Plus d'emojis jolis et cool / Vous rappeler lorsque des emails importants arrivent / Réduire Outlook au lieu de fermer...

👍 Merveilles en un clic : Répondre à tous avec pièces jointes / Emails anti-phishing / 🕘Afficher le fuseau horaire de l'expéditeur...

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

Déverrouillez instantanément Kutools pour Outlook d'un simple clic. Ne tardez pas, téléchargez maintenant et boostez votre efficacité !

Liste des fonctionnalités de Kutools pour Outlook Télécharger la version gratuite Passer à la version professionnelle