Outlook, empecher l'envoi d'un mail à un destinataire ?

Marsh Posté le 13-09-2007 à 17:04:26

Hello,

J'aimerai savoir s'il est possible avec Outlook, d'mpecher l'envoi d'un destinataire en particulier.

Exemple :

J'écris un mail et je me suis trompé, c'est mon pire ennemi , et donc je ne veux pas que le mail parte, grosso modo si outlook voit ce detinataire, alors il me le dit et n'envoit pas ce mail.

Je fais souvent répondre à et j'ai faillit me planter plus d'une fois lors de l'envoi et cela aurait pu avoir des conséquences. Mais cette personne je ne dois jamais lui envoyer de mail , y a une solution ?

Reply

Marsh Posté le 13-09-2007 à 17:04:26

Reply

Marsh Posté le 13-09-2007 à 17:49:30

L'enlever de ton carnet d'adresse ? :spamafote:

Reply

Marsh Posté le 13-09-2007 à 18:01:55

nan c'est dans une entreprise ca je ne peux pas .
enfin concernant le carnet d'adresse global, pas le perso.

Message édité par Clarkent le 13-09-2007 à 18:02:12

Reply

Marsh Posté le 13-09-2007 à 22:58:03

avec un serveur exchange cela est possible. bonne soiré

Reply

Marsh Posté le 14-09-2007 à 11:35:38

Avec une petite macro dans ta session Outlook, c'est possible...

Reply

Marsh Posté le 14-09-2007 à 23:24:30

ouais mais j'ai pas vu le truc, enfin je ne sais pas si on parle de la même chose, régles et alertes.

Reply

Marsh Posté le 17-09-2007 à 11:27:08

Les règles et alertes ne permettent pas d'annuler un envoi, l'action se déroule APRES...
Non, je parle de quelques lignes de codes VBA dans la session Outlook, dans l'évènement ItemSend.
Par exemple :

Private Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean)
Dim monMail As MailItem 'élément Message
Dim monRecip As Recipient 'élément Destinataire

If TypeName(Item) = "MailItem" Then 'le traitement ne se fait que si l'élément envoyé est de type Message
Set monMail = Item
For Each monRecip In monMail.Recipients ' traitement pour chaque destinataire
If LCase(monRecip.Address) = "adresse@monennemi.com" Then 'comparaison avec chaque adresse de destinataire en minuscule
MsgBox "Attention, message envoyé à l'ennemi !" 'par exemple, ou "au patron" ;)
Cancel = True 'annulation de l'envoi
Exit For 'arrêt de la boucle
End If
Next
End If
End Sub

Message édité par Idoine le 17-09-2007 à 11:27:20

Reply

Marsh Posté le 17-09-2007 à 14:32:20

ha ouais carrément , j'avais pas pensé a faire une macro faut dire que je n'en ai jamais fait .

Faut que je créait un projet vb pour ca , bon je vais tenter de galérer avec vba l'environnement vba je maitrise pas.

bein merci pour le tuyau :jap: .

Message édité par Clarkent le 17-09-2007 à 14:35:48

Reply

Outlook, empecher l'envoi d'un mail à un destinataire ?

Sujets relatifs:

Leave a Replay