Discussion :

[Jero_mmmm]

Bonjour,
J’ai fais un code vba excel qui permet de générer un mail.
En lançant le code, je remarque que le corps du mail est précédé par ma signature automatique. Je n’ai pas su comment résoudre cela. J’ai rajouté une ligne pour vider mon mail avant de le remplir, mais c’est pas ça mon objectif. Si vous il y a un code chemin pour réactiver ma signature à la fin, ou si vous avez des idées, n’hésitez pas.

Je suis débutant si vous pouvez m’aider.

Reste à votre disposition pour toutes informations,
Merci d’avance,

[Invité]

Bonjour Jero_m

Je ne sais pas si tu as trouvé la solution depuis, mais en voici une je pense

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
Sub EnvoiMail()  ' Déclaration des variables utilisées dans le code
  Dim OutObj As Object, Email As Object
  ' Création d'une instance Outlook pour envoyer un mail
  Set OutObj = CreateObject("Outlook.Application")
  Set Email = OutObj.CreateItem(0)
  ' Avec mon objet Email
  With Email
    .Display  ' Afficher le mail pour afficher la signature
    ' Destinataire(s) du mail
    .To = "emaildestinataire@fai.fr"
    ' Copie du mail
    .CC = "emaildestinataire@fai.fr"
    ' Sujet de l'eMail
    .Subject = "Ceci est le sujet de mon mail"
    ' Corps du mail avec signature à la fin
    .HtmlBody = "Bonjour," & "<BR><BR>" _
    & "Ceci est un exemple<BR><BR>" & .HtmlBody
    ' Si on veut joindre un fichier
    '.Attachments.Add "C:\Temp\Test.pdf"
    ' Envoyer l'email
    '.Send
  End With
  ' Effacer les variable objet
  Set Email = Nothing: Set OutObj = Nothing
End Sub

A+