Recherche:

merci pour ton aide.

j'ai trouvé la solution!!

mais ton prog ne tourne pas, il bug sur cette ligne


Set wks = Worksheets(strSheetNames(lSheet))

bye

Bonjour,

j'ai des feuilles de données similaires dans un fichier excel.
je souhaite balayer chaque feuille (soit N),
copier plusieurs de ces cellules
par exemple cellule: "B2","B5" , "C4"
...