XL 2019 RechercheV VBA

  • Initiateur de la discussion Initiateur de la discussion Gogo2
  • 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 !

Gogo2

XLDnaute Nouveau
Bonjour,

Je cherche à faire une recherche V à partir d'un userform afin qu'il affiche directement la valeur rechercher lorsque je fais "Entrée".
Le codage comporte "CLNG" qui d'après moi permet de rechercher des valeurs numériques. Or je souhaite effectuer une recherche alphabétique, pourtant en essayant la recherche "STRING", cela ne fonctionne pas.

J'ai joint un fichier simplifié
En vous remerciant
 

Pièces jointes

Bonjour,

Clng est une fonction de conversion, non pas une fonction de recherche.
String est un type de valeur ou une fonction répétant N fois un caractère
String(3,"A") = "AAA"

Sachant que les valeurs de textBox sont toujours des chaînes de caractères (valeur de type String):
Si TextBox1 = "Toto"
Clng(TextBox1 ) donnera une erreur
Si TextBox1 contient "123"
Clng(TextBox1) donnera 123

Sachant que votre fichier ne comporte qu'un tableau vide, ne comporte pas de feuille 'Base', ni de plage 'Tableau' ....

Cordialement
 
Bonsoir Gogo,
Pas tout compris. Pourquoi appelé Nom recherche et chercher dans la colonne A et non C ?

En PJ un essai avec ce que j'ai compris. Avec :
VB:
Private Sub TextBox1_afterupdate()
    On Error Resume Next
    If Application.Match(UserForm1.TextBox1.Value, Sheets("Feuil1").Range("C:C"), 0) = 0 Then
        MsgBox "erreur sur le type du salarié"
    Else
        N = Application.Match(UserForm1.TextBox1.Value, Sheets("Feuil1").Range("C:C"), 0)
        UserForm1.TextBox2 = Cells(N, "B")
    End If
End Sub
 

Pièces jointes

Bonjour,

Pensez-vous qu'il est possible d'aller plus loin dans cette recherche ? Je m'explique :
A présent, le bouton recherche permet d'obtenir le N° à partir selon le nom saisie dans la feuille1.
Serait-il possible d'afficher la ligne entière si le N° apparait dans la feuille2, feuille3, et ne rien afficher si le N° n'apparait pas dans la feuille4.

Exemple : Je cherche NOM9, il me ferait apparait le N° 99, puis une visualisation de la ligne 10 de la Feuille2, la ligne 9 de la Feuille3 et rien pour la Feuille4...

En vous remerciant
 

Pièces jointes

Bonjour Gogo,
Là, c'est un peu plus compliqué.
Déjà je pense que sur un userform ce n'est pas jouable.
Si vous avez plein de feuilles et plein d' informations, ce ne sera pas lisible.
Un essai en PJ avec une autre stratégie.
Une page "Messages" invisible dans laquelle seront rangées toutes les infos.
( la mise en page est faite pour que les colonnes Informations soient les plus larges possibles.
Trois macros:
RechercheNom Macro de recherche et de remplissage avec les résultats
Retour Pour revenir sur la page de travail habituel
PourTestPageMessagesVisible Comme la page Messages est invisible, permet de la rendre visible pour test.
Faites un retour sur si cela vous convient.
 

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
16
Affichages
2 K
Réponses
3
Affichages
897
Réponses
8
Affichages
1 K
  • Question Question
XL 2013 VBA
Réponses
11
Affichages
909
Réponses
1
Affichages
2 K
Retour