Discussion :

[y.chaf]

salut a tous
j'ai un problème et j’espère que vous allez m'aidez et c'est urgent
j'ai des fichiers Excel dans ma boite réception outlook que je veut lire et modifier a partir d'un code VBA
quelqu'un sais comment faire plz c'est vraiment urgent
merciii

[carden752]

Bonjour,

Par définition, il n'y a d'urgent que ce qui est vital donc pour le travail c'est des choses soit en retard, soit susceptibles de l'être
A part cela, tu peux accéder à des mails par VBA puis aux pièces jointes.

Voici une piste pour afficher l'extension des pièces jointes, je te laisse modifier et adapter à ton besoin

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
Sub test()
Dim t As MailItem, a As Attachment 'Pièce jointe
Dim oFSO As Scripting.FileSystemObject 
For Each t In Application.Session.GetDefaultFolder(olFolderInbox).items 'Parcours des mails dans la boite de réception
For Each a In t.Attachments 'Parcours des pièces jointes du mail
Debug.Print oFSO.GetExtensionName(a.PathName) 'Affichage de son extension
Next a
Next t
End Sub