[VBA] Ajouter un champ DE sur envoi de mail

Fermé
Odissine - 21 janv. 2011 à 10:36
pijaku Messages postés 12263 Date d'inscription jeudi 15 mai 2008 Statut Modérateur Dernière intervention 4 janvier 2024 - 21 janv. 2011 à 12:13
Bonjour à tous,
Voilà je suis en train de mettre en place un outil excel pour envoyer automatiquement après validation d'un mail.
Seulement voilà, manuellement ce mail part avant le champ DE "xxxx", or actuellement mon code VBA ne contient que les champs TO, BODY et SUBJECT... est-il possible de rajouter le champ FROM ?

Voilà le bout de code :

Dim ol As Object, myItem As Object
  Set ol = CreateObject("Outlook.Application" )
  Set myItem = ol.CreateItem(olMailItem)
  With myItem
    .From = From_cell >> [cela ne semble pas marcher j'ai un code erreur]
    .To = Att_cell
    .Cc = Copy_cell
    .Subject = Topic_cell
    .HTMLBody = SheetToHTML(Content_cell)
    .Send
  End With
 Set ol = Nothing

Merci pour votre aide ;)

Cordialement

Cyril
A voir également:

1 réponse

pijaku Messages postés 12263 Date d'inscription jeudi 15 mai 2008 Statut Modérateur Dernière intervention 4 janvier 2024 2 750
21 janv. 2011 à 12:13
Salut,
Un exemple ici.
.From = 'youralias@yourdomain.com'
0