Bonjour !

Je voudrais copier la feuille entière d'un classeur vers un autre. Cependant je voudrais le faire sans préciser le nom de ce classeur et sans l'ouvrir. En clair, je lancerai ma macro du classeur dans lequel je veux copier les données. J'ai essayé avec ce code cependant ça ne fonctionne pas il me copie les données sur la feuille source dans un autre onglet. Le voici :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
nom = Application.GetOpenFilename("Nom fichier,*.xls")
Chemin = nom
Fichier1 = ActiveWorkbook.Name
Workbooks.Open Chemin, 0, ReadOnly:=False
Fichier2 = ActiveWorkbook.Name
Workbooks(Fichier1).Sheets(1).Copy Before:=Workbooks(Fichier2).Sheets(1)
Si vous avez des solutions n'hésitez pas !

Merci !