boucle et findnext et find

[Riko]

Bonjour,

Je vous expose mes problèmes:
j'ai crée une boucle pour rechercher un texte dans une feuille excel, normalement lorsque je lance la recherche la première ligne trouvée devrait être la n°1 et ce n'est pas le cas.

Second problème :
Pour sortir de la boucle lorsqu'il n'y a plus rien à chercher j'utilise

Do Until Resultat Is Nothing

La boucle se déroule bien mais après la première occurence trouvée ça recommence.

Pour me dépanner j'ai mémoriser la première ligne trouvée et je la compare avec la nouvelle.

Je pense que j'ai dû encore mal m'y prendre.

Voyez mon fichier en pièce jointe.

Merci d'avance pour votre aide.

Dur dur ce vba

 

[pierrejean]

Re : boucle et findnext et find

bonjour Riko

Vois ceci

compare la macro cherche (module1) avec l'aide de Findnext

 

[Riko]

Re : boucle et findnext et find

Merci pierrejean,

je vais regarder et tenter de comprendre ça.
Je m'y suis encore mal pris. Zut je pensais avoir avancé, c'est encore raté.

Merci et bonne soirée.