Résultats de la recherche

Bonjour, Merci pour ce code, je cherche a automatiser la saisie des résultats. En cell A2 la première recherche j'arrive a ce que le resultat s'ecrive en B2 mais pour la recherche suivant il faut que j'aille en activ cell A3 manuellement puis relancer la macro et le resultat se reecrit en B2...