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
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
A voir également:
- Recherche Valeur Textbox dans une colonne (excel)
- Déplacer une colonne excel - Guide
- Formule somme excel colonne - Guide
- Trier colonne excel - Guide
- Liste déroulante excel - Guide
- Figer colonne excel - Guide
3 réponses
gbinforme
Messages postés
14946
Date d'inscription
lundi 18 octobre 2004
Statut
Contributeur
Dernière intervention
24 juin 2020
4 718
17 janv. 2017 à 21:41
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.
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.
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
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
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
gbinforme
Messages postés
14946
Date d'inscription
lundi 18 octobre 2004
Statut
Contributeur
Dernière intervention
24 juin 2020
4 718
19 janv. 2017 à 18:16
19 janv. 2017 à 18:16
Bonjour,
J'avais alors été présomptueux pour te laisser te débrouiller, cela devrait ressembler à ceci :
Tu mets bien sûr ton vrai nom de feuille et tes vrais noms de contrôles formulaire.
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
19 janv. 2017 à 18:28
Merci beaucoup d'avoir pris du temps pour faire ça !
Ca marche parfaitement !
vous êtes au top !
Ca marche parfaitement !
vous êtes au top !