macro pour rechercher une valeur identique a la valeur rentrer dans une cellule

  • Initiateur de la discussion Initiateur de la discussion jrexcel
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

jrexcel

XLDnaute Nouveau
Bonjour,
je cherche à crée une macro.
En cliquant sur le bouton macro, ça me sélectionne la cellule dans laquel la valeur est identique a ma cellule situer a coter du boutton macro.

merci de me doner une réponse avec un peu d'explication svp.
 

Pièces jointes

Re : macro pour rechercher une valeur identique a la valeur rentrer dans une cellule

A ce n'est pas ce que je vouler. Car si j'ai 500 lignes il me faudra descendre avec la barre ou la sourie, alors que si sa me selectionne une case sa m'amène directement sur la ligne. ( ma case rechercher doit donc etre sélectionné)
 
Re : macro pour rechercher une valeur identique a la valeur rentrer dans une cellule

Bonjour Jrexcel, Rachid, bonjour le forum,

Une proposition VBA avec le code ci-dessous :
Code:
Sub Macro1()
Dim r As Range 'déclare la variable r (Recherche)

With Sheets("Feuil1") 'prend en compte l'onglet "Feuil1"
    'définit la recherche r (recherche la valeur exacte de F4 dans la colonne C en commençant par C1)
    Set r = .Columns(3).Find(.Range("F4").Value, .Range("C1"), xlValues, xlWhole)
End With 'fin de la peise en compte de l'onglet "Feuil1"
If r Is Nothing Then 'condition : si aucunne occurrence n'est trouvée
    MsgBox "la valeur cherchée n'existe pas !" 'message
Else 'sinon
    r.Select 'sélectionne la première occurrence trouvée
End If 'fin de la condition
End Sub
Le fichier :
 

Pièces jointes

- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Réponses
4
Affichages
439
Réponses
5
Affichages
414
Retour