En macro selection de différentes feuilles !

[Jean-Pierre]

Bonjour à tous !

J'arrive à selectionner la page active pour l'envoyer par mail, grâce à une macro !
Pour cette sélection, j'utilise : 'ActiveSheet' .
Mais j'aimerais pouvoir envoyer plusieurs feuilles sélectionnées d'un même classeur.
Quelqu'un peut'il m'aider, a trouver la formule qui me le permettra ?

Merci d'avance.

 

[myDearFriend!]

Bonsoir Jean-Pierre, le forum.

Tu peux peut-être essayer la procédure suivante :

Sub EnvoiFeuilles()
   ActiveWorkbook.Windows(1).SelectedSheets.Copy
   Application.Dialogs(xlDialogSendMail).Show 'Destinataire@Dest.com', 'Ci-joint feuilles du classeur'
   ActiveWorkbook.Close False
End Sub

Cordialement.

 

[Jean-Pierre]

Bonjour Didier,

Merci pour ta réponse qui me convient parfaitement.
Bon Week End à tous