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:

VBA - Copie de feuilles vers autre tableur
Copie cachée - Guide
Copie écran samsung - Guide
Formule tableur somme - Guide
Copie disque dur - Guide
Windows 7 vers windows 10 - Accueil - Mise à jour

1 réponse

Réponse 1 / 1

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

Discussions similaires

lien copié

Comment retrouver des lien copier sur sont téléphone

Colis en cours de transport vers votre site de livraison ?

"L'indice n'appartient à la sélection" + VBA

Erreur d'exécution 13 Incompatibilité de type