Envoi fichier PDF avec texte par mail

Bonjour à toutes et à tous

J'aimerais envoyer une copie de ma facture ou mon devis au format PDF par mail, avec un petit message grâce à un bouton crée "Hotmail"

Voici le message à transmettre :

Bonjour,

Vous trouverez en pièce jointe la "Facture N°001 - EXEMPLE (EXEMPLE)" (nom du fichier) concernant le chantier (Nom du chantier qui se trouve en G14)

Cordialement.

Pour la création du fichier PDF j'utilise ce code (Je sais pas si ça peu servir) :

Sub ImprimerPDF()
Dim LePath$
LePath = "C:\Users\" & Application.UserName & "\Desktop\" & [H10] & [I10] & " - " & [G14] & " (" & [A12] & ").pdf"
If Dir(LePath) <> "" Then If MsgBox("Un fichier nommé '" & LePath & "' " & "existe déjà à cet emplacement" & vbCr & _
"Voulez-vous le remplacer ?", vbYesNo + vbQuestion, "Voulez-vous écraser le fichier PDF existant ?") = vbNo Then Exit Sub
On Error Resume Next
ThisWorkbook.ExportAsFixedFormat Type:=xlTypePDF, Filename:=LePath, OpenAfterPublish:=True
If Err Then
End If
End Sub

Dans le cellule A16 se trouve l'adresse mail du correspondant, juste à coté j'ai crée un petit bouton "Hotmail"

Lorsque cette cellule est vide, afficher un msgbox comme : "Il n'y a pas d'adresse mail d'enregistré pour ce client"

Lorsque le mail est bien partie, afficher un msgbox comme : "Votre mail à bien été envoyé"

J'aimerais obligé l'enregistrement du fichier avant d'envoyer un mail, (pour donner un nom au classeur)

Pour l'envoie de mes mails j'utilise Hotmail

Je reste à votre disposition, et vous remercie par avance

Voici mon fichier :

70exemple.zip (137.87 Ko)

Bonsoir,

Je suis prêt à utiliser un logiciel de mail.

Vous me conseillez quel logiciel.

Sachant que j'ai un compte Hotmail

A+

bonsoir ronibo

comme je te l'ai déjà dit mon fichier en créant le devis il le mets aussi en PDF et si je veux l'envoyer par mail , je l'envoi en pièces jointes avec mon F.A.I

Pascal

Bonjour,

Tu peux me donner une copie de ton fichier stp

a+

Rechercher des sujets similaires à "envoi fichier pdf texte mail"