VBA - Copie de feuilles vers autre tableur

Fermé
fra7878 Messages postés 3 Date d'inscription samedi 26 septembre 2009 Statut Membre Dernière intervention 20 janvier 2015 - 20 janv. 2015 à 14:05
Theo.R Messages postés 575 Date d'inscription vendredi 11 juillet 2014 Statut Membre Dernière intervention 30 mars 2016 - 20 janv. 2015 à 15:24
Bonjour,

J'aimerais copier 3 feuilles de mon fichier d'origine vers un fichier de destination (qui existe déjà).

J'ai essayé ceci mais j'obtiens une erreur:

Sub Sample()
Sheets(Array("Sheet2", "Sheet4", "Sheet5")).Copy Workbooks("Book2.xlsx").Sheets(1)
End Sub

Merci pour votre aide.


A voir également:

1 réponse

Theo.R Messages postés 575 Date d'inscription vendredi 11 juillet 2014 Statut Membre Dernière intervention 30 mars 2016 31
20 janv. 2015 à 15:24
Hello

Pour t'aider, un exemple qui permet de copier dans le doc Classeur1.xlsm les feuilles A et B pour les coller dans le Classeur2.xlsm.

Sub COPIECOLLE()

Workbooks("Classeur1.xlsm").Sheets(Array("A", "B")).Select
Workbooks("Classeur1.xlsm").Sheets(Array("A", "B")).Copy Before:=Workbooks("Classeur2.xlsm").Sheets(1)


End Sub

N.B: le Before est bien sur la même ligne juste après Copy
0