Bonjour,
C'est vrai, elle ne fait que 2 lignes. Mais si tu exécutes cette Macro de 2 lignes, elle va bien copier la feuille dans un nouveau classeur.
Pour le nommer il faut le sauvegarder et donc ajouter une 3ème ligne:
ActiveWorkbook.SaveAs "D:\Documents\nouveau classeur.xlsx"
D.