Mail de confirmation - Adresse mail Expéditeur (Outlook)

Bonjour,

Dans le cadre professionnel, je suis amené à réaliser un fichier qui, une fois rempli doit envoyer un mail d'information de saisie à plusieurs personnes sous VBA.

Jusqu'ici tout va bien, la difficulté est la suivante: il faut que le demandeur reçoive une copie de la demande par mail également.

J'ai essayé plusieurs solutions jusqu'ici infructueuses, c'est pourquoi je me tourne vers le forum et vous, mes "solutionneurs" préférés.

La solution la plus proche du résultat voulu était la suivante:

Set olApp = CreateObject("outlook.application")

Set olNs = olApp.GetNamespace("MAPI")

adresse_outlook = olNs.CurrentUser

Ce code permet de récupérer le nom de l'utilisateur qui, si il est dans ses propres contacts fonctionne. Mais ne fonctionne pas sur les sessions de mes collègues.

Je suis donc à la recherche de toute solution permettant soit:

• de retrouver l'adresse email de l'expéditeur (solution parfaite)
• de transférer le mail depuis la boite d'envoi de l'expéditeur à sa boite de réception (solution galère)
• de retrouver le nom de la session utilisateur "nom prénom (nom de la boite)" pour le mettre en forme adresse email "prenom.nom@nomdelaboite.com" (solution super galère)

Si vous avez des pistes, je suis tout ouïe !!

bonjour,

essaie ceci

adresse_outlook= olapp.Session.Accounts.Item(1).SmtpAddress

Haha c'est Génial !!!

Merci beaucoup !!

C'est bien plus simple que ce que je pensais