Discussion :

[CORIPDC]

bonjour à tous,
j'ai crée une liste et je souhaiterai lors de l'utilisation de "CommandButton", après la fermeture du pop up Recherche un retour sur la cellule A1.
exemple : produit recherché 'orange' qui est dans la liste plusieurs fois et lorsque je ferme le pop up de recherche j'aimerai un retour à A1 afin que le curseur ne reste pas sur la dernière sélection.
Après avoir fini la recherche et ferme la fenêtre de recherche, la cellule sélectionnée reste à la dernière cellule trouvée par la fonction recherche.
c'est peut-être simple mais je ne trouve pas de solution.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
 
 
Private Sub CommandButton3_Click()
'-----------------------le code 
Application.CommandBars("Edit").Controls.Item("Rechercher...").Execute
Application.Goto Range("A1")
End Sub

Je vous joins le fichier et vous remercie beaucoup d'avance.