J'ai trouvé ce fichier dans Google,mais je voudrais modifier la macro de façon a supprimer la feuille Temp et me retrouver dans feuil2 après recherche dans la feuil1,enfin d'éviter une éventuelle feuille supplémentaire du genre Temp.
Je n'y connais pas grand chose en VBA, pourriez-vous m'aider?
une proposition, la macro s'arrête au premier nom trouvé.
Sub chercher()
cherche = InputBox("valeur cherchée ?")
Set re = Sheets("adherents").Cells.Find(cherche, lookat:=xlPart)
If Not re Is Nothing Then
Sheets("adherents").Select
re.Select
Else
MsgBox cherche & " non trouvé"
End If
End Sub