Je suis sous outlook 2003. J'ai créé une macro à exécuter quand je clique sur un bouton que j'ai placé dans fichier > enregistrer les pièces jointes > maMacro.
Maintenant je suis bloqué je ne sais pas quoi mettre dans ma macro.
J'aimerais, lorsque je selectionne un message dans ma boite de reception, enregistrer le corps du message et les pièces jointes dans un meme dossier prédéfinit. Cela est-il clair.
Voici ce que j'ai écrit.
Sub SaveasPJ()
Dim MaDatabase As NameSpace, Folder As MAPIFolder, Mail As MailItem
Set MaDatabase = Application.GetNamespace("MAPI")
Set Folder = MaDatabase.GetDefaultFolder(olFolderInbox)
Set Mail = Folder.Items(Folder.Items.Count)
For Each Attachment In Mail.Attachments
Attachment.SaveAsFile "C:\tmp" & Attachment.FileName
Next
End Sub
Sauf qu'avec ca, ma macro enregistre les pièces jointes de mon dernier message reçu.
Il me semble d'ailleurs que c'est un hasard si je comprend bien le GetDefaultFolder.
J'ai vu d'autres fonctions mais je ne sais pas les utiliser.
