XL 2016 Envoyer feuille excel par mail via bouton

kay

XLDnaute Nouveau
Bonjour,

Je cherche à créer un bouton "envoyer" permettant d'envoyer la feuille active par mail (adresse mail renseignée dans le code), suivi d'un message pop-up pour confirmer l'envoi.

Je l'avais déjà créé, mon bouton marchait parfaitement mais maintenant il duplique le classeur alors que le code n'a absolument pas changé.

Quelqu'un aurait la solution svp ?

Merci :)
 

Pièces jointes

  • Formulaire JDD.xlsm
    83 KB · Affichages: 56

danielco

XLDnaute Accro
Bonjour,

Dans le module Module, colle le code dans une macro nommée par exemple "Envoi".
Colle cette macro dans le module de la feuille "Formulaire", (à la place de celui existant) :

VB:
Private Sub CommandButton1_Click()
  Envoi
End Sub

Cordialement.

Daniel
 

Discussions similaires