Comment obtenir une invite ou une confirmation avant d'envoyer des emails dans Outlook ?
Vous êtes-vous déjà retrouvé(e) à cliquer sur Envoyer dans Outlook, pour réaliser quelques instants plus tard que vous aviez oublié des détails importants, joint le mauvais fichier, ou repéré une erreur embarrassante ? Pour éviter ce genre de problèmes, vous pouvez configurer Outlook pour qu'il vous demande une confirmation via une boîte de dialogue chaque fois que vous appuyez sur le bouton Envoyer. De cette façon, vous avez une seconde chance de relire attentivement vos emails avant qu'ils ne soient réellement envoyés. Dans cet article, nous allons vous guider à travers une solution VBA simple pour y parvenir.
Obtenir une invite ou une confirmation avant d'envoyer des emails en utilisant du code VBA
Obtenir une invite ou une confirmation avant d'envoyer des emails en utilisant du code VBA
Le code VBA suivant fera en sorte qu'Outlook vous demande confirmation à chaque tentative d'envoi d'un email, vous donnant ainsi la possibilité de vérifier votre message une seconde fois.
1. Appuyez sur "Alt" + "F11" pour ouvrir la fenêtre "Microsoft Visual Basic for Applications".
2. Dans la fenêtre VBA, localisez le volet "Explorateur de projets" sur la gauche. Sous "Projet1 (VbaProject.OTM)", double-cliquez sur "Objets Microsoft Outlook", puis double-cliquez sur "ThisOutlookSession" pour ouvrir sa fenêtre de code.
3. Copiez et collez le code VBA suivant dans la fenêtre ouverte :
Private Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean)
Dim xPrompt As String
Dim xOkOrCancel As Integer
On Error Resume Next
xPrompt = "Do you want to continue sending this email?"
xOkOrCancel = MsgBox(xPrompt, vbOKCancel + vbQuestion, "Confirm Email Sending")
If xOkOrCancel <> vbOK Then
Cancel = True
End If
End Sub
4. Appuyez sur les touches "Alt" + "Q" pour sauvegarder et fermer l'éditeur VBA.
📌 Résultat : Désormais, à chaque fois que vous cliquez sur Envoyer pour expédier un email dans Outlook, une boîte de dialogue de confirmation apparaîtra, demandant : "Voulez-vous continuer à envoyer cet email ?" Cliquez sur "OK" pour envoyer ou "Annuler" pour revenir à l'email et continuer la modification.
📎 Plus jamais d'oubli de pièce jointe dans vos emails !
Fatigué d'envoyer des emails sans les pièces jointes importantes ? La puissante fonction Remind Me When I Send a Message That’s Missing Attachments de Kutools for Outlook vous alerte instantanément dès que votre email mentionne des mots-clés spécifiques mais ne contient pas de pièces jointes, garantissant ainsi que vous n'oublierez plus jamais d'envoyer des fichiers cruciaux !
🌟 Fonctionnalités principales :
- Mots-clés personnalisés : Définissez vos propres mots déclencheurs comme "fichier", "facture" ou "document".
- Rappels instantanés : Recevez des alertes en cliquant sur "Envoyer" si votre email contient des mots-clés mais pas de pièces jointes.
- Configuration facile : Ajoutez ou gérez rapidement des mots-clés via une interface simple.
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 !
📧 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 !
