Bonjour à toutes et à tous.

J'aimerais retourner l'adresse email de l'utilisateur actuel de l'application outlook 2010.
J'ai commencé avec ce code :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
Dim objOL as Outlook.Application 
Set objOL = New Outlook.Application
mais je ne sais pas quelle fonction utiliser pour avoir l'adresse email , j'ai tenté celle là :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
Dim email As String = objOL.Session.CurrentUser.AddressEntry.Address
mais ça marche pas, car je reçois pas l'adresse email mais des info inutiles

quelqu'un ici peut m'aider ?
merci d'avance