Bonjour,

Dans un classeur d'une dizaine de feuilles, j'ajoute un nombre aléatoire de feuilles par VBA. Je voudrai créer un autre classeur contenant les feuilles ajoutées en donnant un nom à ce classeur.

Pour donner le nom au classeur je peux employer
Code : Sélectionner tout - Visualiser dans une fenêtre à part
Application.Dialogs(xlDialogSaveAs).Show
Mais pour copier les feuilles je n'ai que
Code : Sélectionner tout - Visualiser dans une fenêtre à part
Sheets(Array("Feuil1", "Feuil2")).Move
Hors, les noms des feuilles sont aussi aléatoires

Y a t'il une autre solution ?
Merci.