Choix de la boite d'envoi

bonjour a tous

j'ai crée une macro pour générer un mail en fonction d'informations sur un fichier.

le souci c'est que je gère plusieurs boites et je souhaite déterminer dans le code VBA quelle est l'adresse de la boite qui doit expédier

pouvez vous m'aider

merci

Bonjour mipec,

Je pense que cet article vous servira

https://docs.microsoft.com/fr-fr/office/vba/api/outlook.mailitem.sentonbehalfofname

A+

merci mais je ne comprends pas le propos de cette page???

Re,

Désolé, en plus je ne vous ai pas donné la bonne piste je crois

Voici un code trouvé

Dim CompteOutlook As Account
For Each CompteOutlook In oOutlook.Session.Accounts
  If CompteOutlook.SmtpAddress = "MonNom@mon-email.fr" Then ' <-- modifiez l'adresse
    .SendUsingAccount = CompteOutlook
    Exit For
  End If
Next CompteOutlook

Edit : la prochaine fois, merci de joindre le code en texte mis entre balise et non une image

A voir

Bonjour,

Oui j’ai trouvé ça aussi mais je ne dois pas l’insérer au bon endroit car j’ai un message d’erreur(erreur de compilation : "type définie par l’utilisateur non défini "

Re,

A mettre entre

With xOutMail

End With

bonjour,

Ça ne fonctionne pas

Re,

Et bien, navré pour vous, mais sans fichier je n'irais pas plus en avant

Bonne journée

Bonjour,

voici mon fichier en question(nettoyé)