Bonjour Spike, le forum
J'ai modifié le code dans ton fichier.
Maintenant il s'adapte automatiquement au nombre de ligne que tu as et la rechercheV refuse de se lancer une 2eme fois si tu l'as déjà fait.
Si tu veux de nouveau relancer la rechercheV tu as 2 manières :
1)Fermer et réouvrir le fichier
OU
2)Mettre à zéro la valeur qui est Sheets("Data").Range("A1").Value
La cellule est modifiable ici.
@Phil69970