Choix du Compte en vba ?

Salut
je relance mon post !!
quelqu'un a t'il une idée ou est ce impossible ?

j'ai donc 2 comptes de messagerie et je souhaite par VBA choisir celui qui
va envoyer le mail

Bonjour à tous
Je voudrais connaitre la propriété qui permet de choisir le "compte"
qui va envoyer un mail en VBA ?
Sous OUTLOOK 2003

--
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
Have a nice day
Oliv'
Pour me joindre : http://cerbermail.com/?V8r2o1YHl4
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~

Salut,

Pour ceux que le sujet à interessé :

Voici la fonction élaborée par SUE MOSHER

Function Set_Account(ByVal AccountName As String, M As Outlook.MailItem) As
String
'Sue Mosher http://www.outlookcode.com/codedetail.aspx?idˆ9
Dim OLI As Outlook.Inspector
Dim strAccountBtnName As String
Dim intLoc As Integer
Const ID_ACCOUNTS = 31224

Dim CBs As Office.CommandBars
Dim CBP As Office.CommandBarPopup
Dim MC As Office.CommandBarControl

Set OLI = M.GetInspector
If Not OLI Is Nothing Then
Set CBs = OLI.CommandBars
Set CBP = CBs.FindControl(, ID_ACCOUNTS)
If Not CBP Is Nothing Then
For Each MC In CBP.Controls
intLoc = InStr(MC.Caption, " ")
If intLoc > 0 Then
strAccountBtnName = Mid(MC.Caption, intLoc + 1)
Else
strAccountBtnName = MC.Caption
End If
If strAccountBtnName = AccountName Then
MC.Execute
Set_Account = AccountName
GoTo Exit_Function
End If
Next
End If
End If
Set_Account = ""

Exit_Function:
Set MC = Nothing
Set CBP = Nothing
Set CBs = Nothing
Set OLI = Nothing
End Function

Salut
je relance mon post !!
quelqu'un a t'il une idée ou est ce impossible ?

j'ai donc 2 comptes de messagerie et je souhaite par VBA choisir
celui qui va envoyer le mail

Bonjour à tous
Je voudrais connaitre la propriété qui permet de choisir le "compte"
qui va envoyer un mail en VBA ?
Sous OUTLOOK 2003