Ajouter une signature à une macro source

**PYDOHM** · 19/07/2017, 16h24

Bonjour,

J'utilise une macro pour envoyer un onglet excel par mail via Outlook :

Je voudrais ajouter ma signature Outlook à cet email

J ai trouvé les 2 macros sur le site "Ron de Bruin" mais du coup ça envoie 2 mails différents !

Serait il possible d'ajouter seulement le code à ma première macro pour ajouter ma signature dans mon mail d'origine dans lequel j envoie un onglet excel via Outlook ?

Merci pour votre aide

Cdt

**parmi** · 19/07/2017, 16h51

Bonjour,

Je ne suis pas certain d'avoir bien compris...
Pour inclure une signature, voici comment je procède

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
    Set OutlookApp = CreateObject("Outlook.Application")
    Set NewMail = OutlookApp.CreateItem(0)  'Crée un message
    NewMail.Display   'affiche le message avec la signature par défaut
    NewMail.To = MailTo
    NewMail.Subject = "Test"
    NewMail.HTMLBody = "<HTML><BODY><PRE><FONT SIZE=2>" & "Test du body" & "</FONT></PRE></BODY></HTML>" & NewMail.HTMLBody  'on ajoute le corps du message + le body existant qui contient la signature
'        NewMail.Attachments.Add "C:\" & Fichier  'au besoin
'    NewMail.Attachments.Add ThisWorkbook.Path & "\" & Chemin & "\" & Fichier
'    NewMail.Display  'affiche le message sans l'envoyer
    NewMail.Send   'envoie le message

Ajouter une signature à une macro source

Macros et VBA Excel

Vue hybride

Discussions similaires

Partager

Partager