Bonne année les Kracks,

Tous mes voeux de bonne santé!

Pour bien démarrer l'année, je souhaiterai effectuer sur des onglets prédéfinis différentes tâches (je vous mets ici que celle en bleu, qui me pose également un problème! )

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
Dim sh As Worksheet
Set sh = "Sheet1" and "Sheet5" and "Sheet8"
For Each sh In ThisWorkbook.Worksheets
Cells(Range("A65000").End(xlUp).Row,16.copy
Next sh
1.Mon code ne boucle pas (prend seulement la feuille active)
2.Pour éviter des "Active" ou "Select" j'ai essayé de remplacer mes lignes d'écriture par le code en bleu, mais j'ai un souci!

D'avance merci,