Bonjour le forum,
J'aimerai pouvoir écrire dans le corps d'un mail, le contenu d'une listbox. Voici mon code:
J'ai essayé les propriétés List, Text, Value...Mais rien ne fonctionne. "body" attend du texte...
Une idée?
Merci à vous.😱
J'aimerai pouvoir écrire dans le corps d'un mail, le contenu d'une listbox. Voici mon code:
Code:
Private Sub CommandButton12_Click()
Dim objOutlook As New Outlook.Application
Dim objOutlookMsg As Outlook.MailItem
Set objOutlookMsg = objOutlook.CreateItem(olMailItem)
With objOutlookMsg
.To = "pierre.paul@jacques.fr"
.Subject = TextBox2.Value
.CC = TextBox4.Value
.Attachments.Add (fic)
.Body = *** Ici le contenu de ma Listbox ***
.Send
End With
Set objOutlookMsg = Nothing
End Sub
J'ai essayé les propriétés List, Text, Value...Mais rien ne fonctionne. "body" attend du texte...
Une idée?
Merci à vous.😱