Bonjour,
Très bonne explication de Xmenpl merci
juste un détail en passant par un bouton le code n'est plus le même.
Le code est bien plus simple.
Juste après : Sub Macro1()
Il faut coller :
Cells(Range("A11"), 1).Select
Bon après tu as réadapté le code il me semble...
Du coup si tu n'y arrive pas envoi ton fichier Excel