Efficasité et repetition du code

Bonjour à tous,

voila quelques années que je n'ai plus toucher au vba et je me retrouve un peu bloquer au niveau de mon code... j'ai fait dans l'ensemble tout ce dont j'avais besoin, cependant j'aimerais que mon if fasse une boucle mais je ne me souviens absolument plus de ce qu'il faut faire

et si cela serait possible que vous jetiez un coup d'oeil au code afin de voir s'il est bon ou s'il est préférable de le changer

je vous remercie

au final j ai fait ma boucle

si vous pouvez juste jeter un oeil au code pour etre sure qu'il soit bon

Bonjour,

déjà tu peux remplacer :

Do While Not IsEmpty(Range("A" & Lig))
    Lig = Lig + 1
Loop

par Lig = Cells(Rows.Count, 1).End(xlUp).Row + 1

Pour le reste, ton épaule gêne pour bien voir ton écran et tes modifs...
eric

merci, en tout cas ça bug pas donc c est que c 'est pas trop mal maintenant je me doute que cela n'est pas parfais et que ça pourrait être mieux mais c est un métier