Re : transcription en code VBA
En fait j'obtiens une erreur d’exécution 1004 :( Et oui, je me suis planté dans l'explication, passer au code suivant veut bien dire passer à la cellule A2. Erreur sur la ligne:
For Each Cel In .Range(.[A1], .Cells(Rows.Count, "A").End(up))