1) - on évite de travailler par des Select ou des Activate à qui mieux mieux
2) - [u]on se réfère ainsi à la cellule A1 de la feuille toto du classeur titi :
Workbooks("titi").Worksheets("toto).Range("A1")/u
3) - la méthode Copy existe. Elle est exposée dans ton aide VBA. Elle permet même de définir une destination (paramètre destination de la méthode) qui réppond à la même règle que celle exposée en 2)
4) il y a une énorme différence entre la première cellule rencontrée vide dans une colonne et la dernière cellule remplie dans la colonne