Bonjour,
j'ai utilisé ce programme vba que j'ai trouvé sur un autre forum. Cependant, j'ai tout essayé et cela ne marche pas. Je crée bien la règle avec correctement en allant chercher ce script :
Sub SaveAttachement(Item As Outlook.MailItem)
MsgBox "Pièces du message " & Item.Subject & " sauvegardés" '<=== Boîte de dialogue à personaliser ou à supprimer
Set attachs = Item.Attachments
For Each attach In attachs
file = attach.FileName
attach.SaveAsFile "C:\" & file '<=== c:\ correspond au dossier dans lequel vous voulez sauvegarder les pièces jointes
Next
End Sub
Je suis en entreprise donc il s'agit peut être d'un configuration interne. Je voudrais savoir si ça est déjà arrivé à quelqu'un en entreprise ou chez lui et si vous pouvez me guider vers des solutions.
Merci par avance.
Partager