macro

[Alain]

Bonjour,

Je suis confronté au problème suivant :
une série de dossiers fonctionnant chacun avec 2 feuilles.
Il s'agit de recopier une série de résultats de la feuille 2 dans un tableau de la feuille 1.

Comment réaliser la macro (recopiable sur chaque dossier - j'aimerai placer tous les dossiers dans le même classeur). Actuellement la macro va systématiquement rechercher les résultats du 1er dossier.

ex: dossier 1 (feuille1;feuille2) dossier 2 (feuille3:feuille4) etc...

Je suis coincé! Merci de votre aide

 

[Bernard]

Bonsoir Alain

J'ai une solution basique mais qui marche :
tu fais une copie successive de 2/1 puis 4/2 et ainsi de suite
Cette macro a la forme ci-dessous, les plages doivent, bien sur, être ajustées.

Sub COPIEDOSSIER()
'Copie dossier 2 sur dossier 1
Sheets("Feuil1").Select
Sheets("Feuil2").Range("A1:B10").Copy
Range("E1").PasteSpecial Paste:=xlPasteValues
Application.CutCopyMode = False
'Copie dossier 4 sur dossier 3
Sheets("Feuil3").Select
Sheets("Feuil4").Range("A1:B10").Copy
Range("E1").PasteSpecial Paste:=xlPasteValues
Application.CutCopyMode = False
'Copie dossier 6 sur dossier 5
'Etc...Etc...
End Sub

Salut

Bernard