Salut,
disons, juste à raccourcir le code. Comme je l'ai fait avec l'enregistreur de macro,
je pensais qu'il y avais des éléments en trop, si ce n'est pas le cas tant mieux.
ActiveSheet.Range("$E$1:$E$6999").
De E1 à E6999, je sais que le nombre de ligne évoluera, peut on mettre
E1:E ?