Bonjour,

J'ai créé un Userform qui contient un bouton de commande.
Au clic sur ce bouton, un mail contenant les infos du formulaire part vers l'adresse mail indiquée.
En plus, j'aimerais aussi qu'un mail de bonne réception parte vers la personne ayant renseignée le formulaire (et dont son Email est renseignée dans une textbox). Je n'arrive pas à traiter ce point. Est-ce que quelqu'un aurait des pistes?

Pour info, il faudrait que cela fonctionne sur Outlook.

Voici mon code actuel :

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
Private Sub CommandButton1_Click()
 
  Dim MonOutlook As Object
  Dim MonMessage As Object
  Dim corps As String
 
  Set MonOutlook = CreateObject("Outlook.Application")
  Set MonMessage = MonOutlook.createitem(0)
  MonMessage.to = "test@test.com"
  MonMessage.Subject = "Sujet"
 
    corps = "blablabla"  
  MonMessage.body = corps
  MonMessage.send
  Set MonOutlook = Nothing
  Suggestion.Hide
 
End Sub
Merci à vous !