Discussion :

[GOULIER]

Bonjour,

Je suis novice en VBA et je souhaiterais créer un petit programme pour automatiser l’envoi de mes factures (environ 250 tous les mois).

Ci-joint un exemple de fichier. Le programme devrait envoyer un mail (navigateur par défault) à chaque client présent dans la colonne B en y associant la pièce jointe qui se trouve dans un dossier de mon disque dur et qui porte comme nom la référence qui est indiquée dans la colonne A.

Le sujet et le corps du mail seront toujours les mêmes pour tous les clients :
Sujet : Facturation
Corps du mail :
Bonjour,
Je vous prie de bien vouloir trouver ci-joint votre facture,
Bien cordialement,

Merci d'avance pour votre aide,

JP.

[Invité]

Bonjour,

Au bas de votre message, des liens vous renvoient sur des sujets semblables qui peuvent vous donner des pistes pour réaliser votre projet.
Si cela ne suffit pas, vous avez la possibilité de réaliser des requêtes : mail, facture, vba

[GOULIER]

Bonjour,

effectivement vous avez raison il existe des discutions similaires !

j'ai réussi à partir de quelques exemples à constituer le code suivant :
par contre je ne sais pas comment ouvrir mon navigateur par défaut (thundirbird sur mac) et lui demander d'ouvrir un nouveau mail en y intégrant toutes le commandes indiquées dans le code ci-dessous !

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
Sub Mail()
 
Dim adresse, sujet, message As String
 
For i = 1 To last row ‘de la ligne 1 à la dernière utilisée
adresse = Range(«b» & i)
sujet = «Facturation»
message = Range(«c» & i) & vbCrLf & «*Je vous remercie de bien vouloir vérifier l’ensemble des informations » ‘VBCRLF permet un retour à la ligne
 
.Subject = sujet
.to = adresse
.body = message
.Attachments.Add «C:\Range(«a» & i)»`facture en pièce jointe au mail
.send ‘on envoie le mail créé

End With
Next i ‘on passe au mail suivant
End Sub

merci encore pour votre aide,

JP.

[Invité]

Rebelote : on fait une requête cette fois tout en haut de la fenêtre à droite pour voir mail,thundirbird

Il vous faut préciser la version et la plateforme (PC ou MAC) sur laquelle vous travaillez lorsque vous initialisez un message. N'ayant pas de Mac, je ne peux pas vous aider.

[GOULIER]

pour info je suis sur mac.

je n'ai rien trouvé sur le forum !

mais sur internet j'ai trouvé ce bout de code :

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

maintenant il faut que j'arrive à l'intégrer à mon code précédent...

[Invité]

maintenant il faut que j'arrive à l'intégrer à mon code précédent...

Il vous faut trouver la Dll à référencer. A explorer : dll,thunderbird

Voir également l'envoi par CDO.

Bon courage.