XL 2016 Envoyer feuille excel par mail via bouton

[kay]

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 🙂

 

[danielco]

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) :

Private Sub CommandButton1_Click()
  Envoi
End Sub

Cordialement.

Daniel

 

[kay]

Bonjour danielco, ça fonctionne

Merci pour ton aide

Bonne soirée