Outlook via Excel

Bonjour à tous,
Je cherche depuis quelques jours sur le net, un moyen d'envoyer un email outlook via Excel.

Je souhaiterais pouvoir choisir mon compte d'utilisateur au depart.
Sous outlook j'ai deux comptes protegé par mot de pass.

Avec excel, je souhaite choisir mon compte, saisir le mot de pass, et ensuite envoyer mon email.
Pour l'envoi de l'email, no soucin j'utilise l'object

Code:

---

CreateObject("Outlook.Application")

---

Je pense que cela doit se trouver dans

Code:

---

OutApp.Session.Logon "utilisateur","Password"

---

mais ca ne marche pas.

Merci par avance
t

Tu peux essayer quelque chose comme ça:

Code:

---

1 2 3 4

Dim ns as Object   Set ns = OutApp.GetNameSpace("MAPI") ns.Logon "utilisateur", "password"

---