Aide pour modifier un code

bonjour le forum,

bonjour à tous,

j'ai besoin d'aide pour modifier ce code.

je me suis rendu compte ce matin que le code produit 201021 n'était pas repris sur la feuille données alors qu'il existe sur la feuille entrées.

en fait le code va sur la "feuille entrées" - copie tout ce qui est en colonne I - fait un tri du plus grand au plus petit - supprime les doublons - et copie sur la "feuille données" en colonne I en laissant une cellule vide à chaque fois.

merci d’avance.

cordialement.

Moutchec.

Bonjour,

Ta procédure modifiée.

Cdlt.

bonjour @Jean-Eric et merci pour votre intervention,

j'ai un bug sur cette ligne : Set rng = .Cells(3, 9).Resize(lastRow - 2)

merci bcp.

Moutchec.

Re,

Ton fichier en retour.

Cdlt.

re,

ça fonctionne nickel, merci d'y avoir consacré votre temps.

bien à vous.

Moutchec.