Recherche Valeur Textbox dans une colonne (excel)

Résolu/Fermé

benji2031 Messages postés 3 Date d'inscription mardi 17 janvier 2017 Statut Membre Dernière intervention 19 janvier 2017 - 17 janv. 2017 à 20:53
benji2031 Messages postés 3 Date d'inscription mardi 17 janvier 2017 Statut Membre Dernière intervention 19 janvier 2017 - 19 janv. 2017 à 18:28

Bonjour,
Sur un classeur j'ai plusieurs feuilles dont une avec des ingrédients.
Je souhaite crée un bouton de recherche (sur une feuille différente de la feuille ingrédient) qui m'ouvre un formulaire (userform) de recherche( jusque là rien de complexe).

Dans ce formulaire j'ai une textbox et un bouton "rechercher".
J'aimerais que lorsque je rentre un mot dans la textbox et que je clique sur "rechercher", la macro m'envoie sur la feuilles des ingrédient et me sélectionne la ligne de ce mot.

Exemple : je tape "chocolat"---> rechercher et je tombe sur la cellule "chocolat" dans la feuille ingrédient.
En espérant avoir été clair et concis.
Merci d'avance
Benji2031

A voir également:

Recherche Valeur Textbox dans une colonne (excel)
Déplacer une colonne excel - Guide
Liste déroulante excel - Guide
Additionner colonne excel - Guide
Figer une colonne excel - Guide
Formule excel - Guide

3 réponses

Réponse 1 / 3

gbinforme Messages postés 14946 Date d'inscription lundi 18 octobre 2004 Statut Contributeur Dernière intervention 24 juin 2020 4 684
17 janv. 2017 à 21:41

Bonjour,

Comme tu as l'air de connaitre vba, ta réalisation n'est pas compliquée, il te suffit d'utiliser la fonction "range.find" dont l'utilisation est expliquée dans l'aide.

Réponse 2 / 3

benji2031 Messages postés 3 Date d'inscription mardi 17 janvier 2017 Statut Membre Dernière intervention 19 janvier 2017
19 janv. 2017 à 14:21

Bonjour
je suis désolé mais je n'y connais absolument rien en codage pur vba, c'est comme si je partais de zéro.
Je n'ai pas réussi avec la fonction range.find ou alors je n'ai pas compris comment l'utiliser.
Merci d'avance
Benji2031

Réponse 3 / 3

gbinforme Messages postés 14946 Date d'inscription lundi 18 octobre 2004 Statut Contributeur Dernière intervention 24 juin 2020 4 684
19 janv. 2017 à 18:16

Bonjour,

J'avais alors été présomptueux pour te laisser te débrouiller, cela devrait ressembler à ceci :

Private Sub CommandButton1_Click()
Dim sel As Range
    Set sel = Sheets("ingrédients").Cells.Find(Me.TextBox1.Value, , xlValues, xlWhole)
    If sel Is Nothing Then
        MsgBox "Recherche absente"
    Else
        Sheets("ingrédients").Activate
        sel.Activate
    End If
End Sub

Tu mets bien sûr ton vrai nom de feuille et tes vrais noms de contrôles formulaire.

benji2031 Messages postés 3 Date d'inscription mardi 17 janvier 2017 Statut Membre Dernière intervention 19 janvier 2017
19 janv. 2017 à 18:28

Merci beaucoup d'avoir pris du temps pour faire ça !
Ca marche parfaitement !
vous êtes au top !

Discussions similaires

[Excel] Vérifier existence cellules colonne A dans colonne C

Formule Excel : "SI" une cellule contient un mot, alors ?

colonne A disparue tableur excel

Discussions similaires

Newsletters