Remplir le champ From d'Outlook depuis Excel

Signaler
Messages postés
11
Date d'inscription
jeudi 21 juillet 2005
Statut
Membre
Dernière intervention
12 août 2008
-
Messages postés
11
Date d'inscription
jeudi 21 juillet 2005
Statut
Membre
Dernière intervention
12 août 2008
-
Bonjour,

J'aimerais remplir un mail Outlook depuis Excel.
Voici mon code :

    Dim olapp As Outlook.Application
    Dim msg As mailitem
    Set olapp = New Outlook.Application
    Set msg = olapp.CreateItem(olMailItem)

    msg.To = Range("D12").Value

Par contre, je n'arrive pas à remplir le champ From (expéditeur).
Merci de votre aide.

2 réponses

Messages postés
2065
Date d'inscription
lundi 11 avril 2005
Statut
Membre
Dernière intervention
14 mars 2016
10
Bonsoir,

Voici un peu près toutes les balisses :

with msg
   .subject = " Ici c'est le sujet"
   .Body = " Ici c'est le corps du message" ' Ce que tu veux !
   .bodyformat = olFormatHTML
   .Recipients.add ("MACHIN")
   .attachments.add Thisworkbook.path & "" & thisworkbook.name

   .send
end with

Amicalement,
Us.
Messages postés
11
Date d'inscription
jeudi 21 juillet 2005
Statut
Membre
Dernière intervention
12 août 2008

Bonjour,

Donc si je comprend bien, le From n'existe pas, c'est ca ??