Bonjour,
J'ai réussi une macri me permettant d'envoyer un fichier atacher excel:
Private Sub mail_Click()
Dim ch As Integer
ch = MsgBox("Etes-vous sûr d'envoyer le mail maintenant?", vbYesNo, "ENVOI Mail")
ActiveWorkbook.SendMail Recipients:=Sheets("Feuil2").Range("nomMail").Value, Subject:="fichier test"
End Sub
Par contre cela ne va pas totalement.
Je voudrais rajouter un bouton pour l'enregistrement où la macro me demande où je veux l'enregistrer le fichier puis pour l'envoi, il faudrait que cela envoie juste la feuille1 et pas la macro et tout cela en .csv.
Est ce possible?
Merci beaucoup. 😉
J'ai réussi une macri me permettant d'envoyer un fichier atacher excel:
Private Sub mail_Click()
Dim ch As Integer
ch = MsgBox("Etes-vous sûr d'envoyer le mail maintenant?", vbYesNo, "ENVOI Mail")
ActiveWorkbook.SendMail Recipients:=Sheets("Feuil2").Range("nomMail").Value, Subject:="fichier test"
End Sub
Par contre cela ne va pas totalement.
Je voudrais rajouter un bouton pour l'enregistrement où la macro me demande où je veux l'enregistrer le fichier puis pour l'envoi, il faudrait que cela envoie juste la feuille1 et pas la macro et tout cela en .csv.
Est ce possible?
Merci beaucoup. 😉