Question : confirmer l'email avant l'envoi

Y a il une manière de demander « sont vous sure que vous voulez envoyer cet email ? » confirmation avant d'envoyer un message dans MS Outlook 2007 ? class= de

Réponse : confirmer l'email avant l'envoi

Pour faire monter une boîte demandant, « vous voulez envoyer » dans la fenêtre principale de perspectives, la presse Alt+F11

dans le session> de perspectives d'outlook>this de bureau de project1>microsoft

coller le code suivant et sauf et étroit.

Il fera un message apparaître dans la fenêtre principale quand vous envoyez (juste alt+tab pour le voir)

*note1 : Si cela ne fonctionne pas immédiatement, abaisser votre macro sécurité



*note2 : une autre manière est de mettre simplement, « dontsendyet » dans à : la boîte (sans citations) et elle n'enverront pas à moins que vous l'enleviez.

1 : 2 : 3 : 4 : 5 : 6 : 7 : 8 : 9 : 10 : 11 : 12 : 13 : 14 : 15 : 16 : 17 : 18 : 19 : 20 : 21 : 22 : 23 : 24 :

Option explicite Faibles objInspectors de WithEvents comme inspecteurs Faible objMyNewMail de WithEvents comme MailItem Application_Startup secondaire privé () Placer les objInspectors = l'Application.Inspectors Finir le sous-marin Application_Quit secondaire privé () Placer les objInspectors = rien Placer l'objMyNewMail = rien Finir le sous-marin objInspectors_NewInspector secondaire privé (inspecteur de ByVal comme inspecteur) Si l'olMail <> d'Inspector.CurrentItem.Class sortent alors le sous-marin Placer l'objMyNewMail = l'Inspector.CurrentItem Finir le sous-marin objMyNewMail_Send secondaire privé (annulation comme booléenne) Si MsgBox (« êtes-vous sûr vous voulez-vous envoyer ce message ?  », _ de vbYesNo + de vbQuestion , « ENVOYER LA CONFIRMATION ») = vbNo puis L'annulation = rectifient Finir si Finir le sous-marin