Bonjour,
Le changement est que, j'ai déplacé la déclaration de public adresse dans ta feuille et plus dans le module1, ensuite tu avais l'erreur erreur 13 sur la variable Adresse = Target.Address, donc dans ton code (bouton2_click) où tu utilisais Target.Address, j'ai remplacé par feuil1.adresse pour ne plus avoir l'erreur 13 vu que Target.Address n'est pas connu dans l'événement click du bouton !!!! c'est pour cela qu'il faut déclarer la variable adresse en public pour pouvoir t'en servir en utilisant feuil1.adresse.
J'ai fait ce que tu demandais... Maintenant je ne sais pas ce que ton programme doit faire par la suite, je ne suis pas devin non plus...
Dans le dernier fichier que j'ai téléchargé ici, tu dis avoir changé target.address par feuil1.adresse, mais quand je vais dans le code, rien n'est modifié et l'erreur venait de là...
Voilà le copié/collé du code qu'il y avait dans le fichier
Set c = Sheets("Agent1").Columns("A").Find(Target.Value, LookIn:=xlValues, lookat:=xlWhole)
Tu peux voir que dans mon fichier, la modification est faite... faut peut être bien regarder avant de dire qu'il n'y a aucune différence entre ton dernier fichier et le mien...
Déjà que je fais mon possible pour t'aider, mais je ne suis pas là pour me faire critiquer que soit disant j'ai rien fais sur le fichier...
Je ne viendrai pas pendant qq jours car je rentre à l'hosto....
Bonne fin de semaine.
John