obouana a écrit :
Merci de votre aide, j'ai trouvé par moi-même fort heureusement car cela n'a pas l'air d'intéresser grand monde....
Super, gentil, adorable !! Et c'est trop demandé de justement avoir le bout de code qui fait cette merveille ?
Le but du forum c'est aussi que ça puisse servir à d'autres personnes par la suite.
La preuve c'est que moi en moins d'une minute j'ai trouvé sur ce forum des posts qui répondent à ton problème, en adaptant ce petit bout de code (qui revient très fréquemment sur le forum !) on peut répondre à ta question, il suffit juste de RECHERCHER sur ce forum (en haut à droite), une commande que bien peu de personnes utilisent alors qu'elles pourraient avoir immédiatement leur réponse.
DerLig = [A65000].End(xlUp).Row
Ensuite avec un petit Autofill on peut faire des merveilles, mais bon tu as trouvé c'est l'essentiel.