Bonsoir,
adapter le code pour qu'il commence à partir de B10
dans la 1ere macro, il convient de modifier la 3eme ligne :
For J = 1 To Range("A" & Rows.Count).End(xlUp).Row ' Pour tous les nombres de la colonne A
par :
For J = 10 To Range("B" & Rows.Count).End(xlUp).Row ' Pour tous les nombres de la colonne B, après 10
quels que soient les textes ou valeurs situés au dessus (B1 à B9), qui ne seront pas pris en compte
par ailleurs, il ne faut pas d'espace vide dans la liste sinon : passage au débogage !
Bonne suite
Cordialement
axion