L'indice n'apartient pas a la selection

Bonsoir a tous, j'ai une erreur bete lorsque j'essai de copier 3 feuilles du fichier ouvert vers un autre fichier qui contient les memes feuilles. La derniere ligne de ce bout de code me donne une erreur, pourquoi? :

Sheets(Array(Feuil1.Name, Feuil2.Name, Feuil8.Name)).Copy  'nom des feuilles à copier
    Sheets(1).Rows("1:2").DELETE
    Sheets(2).Rows("1:1").DELETE
    Sheets(8).Rows("1:1").DELETE

Bonjour,

Avec ton code tu copie 3 feuilles dans un nouveau classeur.

Mais les index ne corresponde plus, tu a

Sheets(1) ..Sheets(2)..ET Sheets(3) et pas 8

A+

SALUT, j'essai de copier les feuilles 1,2 et 8 de mon classeur ouvert dans un autre qui comprend egalement une feuille 1, 2 et 8. Que dois-je faire avec le 8 de mon classeur ouvert?

Salut Capucin,

CAPUCIN a écrit :

Que dois-je faire avec le 8 de mon classeur ouvert?

Réponse : ce que te conseille Lermite Regarde le fichier ci-joint dans lequel j'ai placé le code qu'il propose.

Cordialement.

Merci a vous deux, mon probleme est maintenant resolu!