Bonjour Emilie,
mDF avait donné cette macro là, mais je crois que plein d'autres fonctionnent :
Sub Envoi()
Sheets(Array(3, 4)).Copy
Application.Dialogs(xlDialogSendMail).Show 'Destinataire@Dest.com', 'Ci-joint Feuilles 3 et 4'
ActiveWorkbook.Close False
End Sub
Ca te permet de choisir les feuilles.