Multiplier les règle s de déplacement de message

Bonjour,

J'ai une règle (trouvée sur ce forum) qui me permet de déplacer la pièce jointe d'un mail reçu. J'ai essayer de multilplier les règles en copiant collant le code dans un nouveau module et en modifiant le nom du module et les paramètres de la règle mais cela ne fonctionne pas...

Voila le script :

Code:

---

1 2 3 4 5 6 7 8 9

Sub SaveAttachement(Item As Outlook.MailItem) MsgBox "Base En cours mise à jour à l'aide du fichier :" & Item.Subject '<=== Boîte de dialogue à personaliser ou à supprimer Set attachs = Item.Attachments   For Each attach In attachs file = attach.FileName attach.SaveAsFile "D:\OneDrive - SNCF\PROFESSIONNEL\1 - MFIW\PRODUCTION\Power BI\SOURCES\PRODUCTION\base_encours_mfi.xlsx" '<=== c:\ correspond au dossier dans lequel vous voulez sauvegarder les pièces jointes Next End Sub

---

Sauriez vous pourquoi ?

Merci :)

Salut,

ce n'est pas le nom du module qui importe, mais le nom de la fonction/procédure que tu souhaites rattacher à ta règle.

C'est le texte qui est après "Sub" ?

Merci Jean-Philippe ;-)

Bonjour,
oui le nom de la procédure c'est ce qu'il y a entre le sub et le ().

Attention cette procédure enregistre toutes les PJ du mail sou sle même nom, donc au final il n'y a que la dernière pj qui est enregistrée.