Bonjour à tous!
Thib999, voici le code pour envoyer avec thunderbird que je me sers à placer dans un module standard
Sub Envoi_Email()
Dim destinataire, sujet, fichierjoint As String
destinataire = "paul@gmail.com, jean@gmail.com"
sujet = " ce que tu veux"
body = "Salut!" & Chr(10) & "et ta note"
fichierjoint = "C:\blabla\tonfichier"
strcommand = "C:\Program Files\Mozilla Thunderbird\thunderbird"
strcommand = strcommand & " -compose " & "to='" & destinataire & "'"
strcommand = strcommand & "," & "subject=" & sujet & ","
strcommand = strcommand & "body=" & body
strcommand = strcommand & "," & "attachment=file:///" & fichierjoint
MsgBox strcommand
Call Shell(strcommand, vbNormalFocus)
End Sub
Bonne journée !