Bonjour,
Je reviens à la charge lol...
Je souhaite désespérément accéder à un dossier d'une boite aux lettres outlook ne se trouvant pas dans ma boite aux lettres par défaut.
Et c'est justement la dernière ligne qu'il me faudrait modifier.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6 'Création de l'objet Outlook Set objoutlook = CreateObject("Outlook.application") 'Récupération de l'espace de nom d'outlook Set olns = objoutlook.GetNamespace("MAPI") 'Récupération du répertoire "boite de réception" par défault Set fld = olns.GetDefaultFolder(olFolderInbox)
J'ai beau chercher à droite à gauche, pas de solution en vue.
Après, j'arrive parfaitement à récupérer la pièce jointe en fonction de l'émetteur ou de l'objet du message...
Je vous serais hyper reconnaissant si vous pouviez ne serait-ce que me pousser dans la bonne direction...
Cdt,
Partager