[Résolu] envoi de messages par VBA via Thunderbird
Publié : 26 avr. 2013, 18:05
bonjour,
j'utilise un code VBA dans excel pour générer automatiquement un message avec plusieurs destinataires et une piece jointe. Ce code fonctionne nickel;
voici le code :
Par contre je n'arrive pas a le modifier pour lui rajouter une 2eme piece jointe.
est ce que cela est possible ?
merci pour votre aide.
Votre Navigateur : Mozilla/5.0 (compatible; MSIE 9.0; Windows NT 6.1; Trident/5.0)
j'utilise un code VBA dans excel pour générer automatiquement un message avec plusieurs destinataires et une piece jointe. Ce code fonctionne nickel;
voici le code :
Code : Tout sélectionner
Sub Mail()
Dim destinataire, sujet, fichierjoint, As String
destinataire = "toto@orange.fr,tata@orange.fr"
sujet = " fichiers"
body = "Veuillez trouver ci-joint fichier des données ; Cordialement"
fichierjoint = "C:\donnees1.xls"
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
est ce que cela est possible ?
merci pour votre aide.
Votre Navigateur : Mozilla/5.0 (compatible; MSIE 9.0; Windows NT 6.1; Trident/5.0)