Me revoiloù...
Ouarf j'ai mon message qui n'est pas parti...bah c'est pas grave puisqu'il est toujours en mémoire avec PostVL...et hop !...bouton récupérer...lol
Bon ben j'ai regardé le principe c'est pas mal comme exemple...
Par contre chez moi il bloquait à :
Set nom = rngB.Find(cell, , xlValue, xlWhole, xlByColumns, xlPrevious)
et je n'ai pas bien compris pourquoi tu avais mis autant d'arguments dans le find...
Donc finalement j'ai rectifié la procédure avec çà :
Set nom = rngB.Find(cell)
et çà marche...lol
en fait dans ta macro la réference de la colonne est faite avec
Set rngB = Range(Cells(3, 4), Cells(Rows.Count, 4).End(xlUp)), et le
cell correspondant à la valeur de la cellule à comparer n'a pas besoin d'être à nouveau positionné au même endroit...
Enfin je connais un peu les caprices d'Excel 97 qui à besoin de précisions...c'est pour cette raison que je comprends aussi pourquoi il y a un
Sheets("feuil1").Select en début de procédure...chez moi il est superflue...
Voili voiloù le pourquoi du comment
Mais c'est encore bien d'avoir des personnes qui utilisent 97...comme il y en a plusieurs qui tournent avec cette version tu leur viens en aide...
Par contre XP c'est pas un peu fort pour lui ???...ça va il tourne bien ???
Bonne programmation
PS : euh Joël...c'est bon tu peux utiliser le fichier de Vincent, il répond précisément à ta question de départ...mais j'suis presque sûr que tu l'utilises déjà...lol