Re chinazzi
Cells(Range("B65535").End(xlUp).Row + 1, 1) = Ta_valeur
Cells(Range("C65535").End(xlUp).Row + 1, 1) = Ta_valeur
Range("B65535").End(xlUp).Row te trouves la derniere ligne vide de la colonne B
Range("C65535").End(xlUp).Row te trouves la derniere ligne vide de la colonne C
Donc pour la colonne désirée faut modifier le code
alors Cells(Range("B65535").End(xlUp).Row + 1, 1) = Ta_valeur va devenir
Cells(Range("B65535").End(xlUp).Row + 1, 2) = Ta_valeur ou 2 représente la colonne B
et Cells(Range("C65535").End(xlUp).Row + 1, 1) = Ta_valeur va devenir
Cells(Range("C65535").End(xlUp).Row + 1, 3) = Ta_valeur ou 3 représente la colonne C
En espérant avoir été assez clair dans l'explication
A+ Mytå