Renommer un pièce jointe envoyée par mail

[rodrigues89]

Bonjour tout le monde,

j'ai une macro qui fonctionne très bien et fait exactement ce que je lui demande :

au clic sur le bouton mail, elle m'ouvre un nouveau mail sur outlook avec en pièce jointe l'onglet sélectionné.

cependant, elle me nomme la pièce jointe "classeur1.xls" et j'aimerai au mieux choisir par une textbox le nom à donner à la pièce jointe ou au moins qu'elle prenne le nom du fichier.

Si quelqu'un peut m'aider je lui en serais très reconnaissant.


voici la macro :


Sub mail()
ActiveSheet.Copy
ActiveWorkbook.SendMail (dest), "Indicateurs : MARS"
ActiveWorkbook.Close SaveChanges:=False
End Sub

et un petit fichier d'exemple.


Merci d'avance

 

[Compte Supprimé 979]

Re : Renommer un pièce jointe envoyée par mail

Salut Rodrigues89,

Merci d'effectuer des recherches sur le forum ou de regarder en bas de ce fil dans "discussions similaires"
La procédure d'envoi est complètement différente pour ce que tu souhaites

A+

 

[Hippolite]

Re : Renommer un pièce jointe envoyée par mail

Bonsoir,
Regarde ici
38628-pb-avec-piece-jointe-ds-mail.#post183496
il suffit d'adapter le nom du fichier temporaire.
A+

 

[rodrigues89]

Re : Renommer un pièce jointe envoyée par mail

Merci beaucoup, je vais continuer à chercher alors.

Bonne journée

 

[Hippolite]

Re : Renommer un pièce jointe envoyée par mail

Re,
Autre référence intéressante : Example Code for sending mail from Excel
A+