Bonjour,
J'essaie d'utiliser une script deque j'essaie d'adapter . J'ai vraiment du mal en VBA Outllok https://outlook.developpez.com/faq/?page=VBA#Script_Regledolphy35 - Merci a lui
Je voudrais récupérer le nom de domaine de l'expéditeur a l'arrivé d'un mail.
Voici le script
Quand je reçois un mail j'ai ce message d'erreur.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9 Sub script(Mail As MailItem) Dim SenderEmailAddress, Domaine As String Domaine = Split(SenderEmailAddress, "@", 1) MsgBox Domaine SenderEmailAddress = Mail.SenderEmailAddress End Sub
Deuxièmement je voudrais utiliser ce nom de domaine pour renseigner le champ société de Tous les champs Document. Ce qui permet de classer les mails par le champ société.
Comment faire ?
Merci beaucoup.
Partager