Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Userform recherchev

Créer une discussion
  • Initiateur de la discussion Initiateur de la discussion nherambo
  • 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 !

S'inscrire
N

nherambo

Guest
Bonjour, j'ai besoin de votre aide.

Je n'arrive pas à faire une recherchev dans mon userform. Ayant plusieurs fois le même nombre, je voudrais dans le UserForm, entrer manuellement le "Number". A la suite de cela, la liste déroulante "Correspondance" me donnerait uniquement les correspondances correspondantes. Je n'ai donc plus qu'à choisir la correspondance que je veux pour avoir l'équivalent dans la combobox "Equivalent".


Plus clairement, si je saisis le number 4, je voudrais que dans ma combobox "Correspondance", j'ai le choix entre E, F, ou G. En sélectionnant G, je verrais apparaitre automatiquement "x19" dans la Combobox "Equivalent".

Merci par avance pour votre aide précieuse !

Nherambo
 

Pièces jointes

Trier par date Trier par votes
Re : Userform recherchev

Re,

Une nouvelle torture pour progresser. J'ai créé une ListBox (cf. fichier).
Par contre je voudrais que quand j'entre une valeur dans "Number" que les données de la ListBox correspondent aux lignes de ce nombre dans la feuille2.

Si je mets la valeur 4 dans number, je souhaiterais avoir dans la listbox uniquement les lignes contenant 4 comme nombre. Sauf que je n'arrive pas à mettre de condition.

Merci pour ton aide
 

Pièces jointes

Vote positif 0 Vote négatif
Re : Userform recherchev

Code: 
Dim F1 As Worksheet
Set F1 = Sheets("Sheet2")
With Me.ListBox1
    .ColumnCount = 3
    .ColumnWidths = "40;40;40"
    For Lg = 1 To F1.Range("B" & Rows.Count).End(xlUp).Row
     If F1.Range("B" & Lg).Text = number.Text Then
     .AddItem F1.Range("B" & Lg)
        .List(.ListCount - 1, 1) = F1.Range("C" & Lg)
        .List(.ListCount - 1, 2) = F1.Range("D" & Lg)
    End If
    Next Lg

End With
condition = if .... = .... then .... end if
A+
 
Vote positif 0 Vote négatif
Identifiez-vous ou inscrivez-vous pour participer.
Rejoins nos membres "Supporter XLD" et booste ton expérience Excel !
- 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
Assurez vous de marquer un message comme solution pour une meilleure transparence.

Discussions similaires

P
  • Résolu(e)
Microsoft 365 Comparaison 2 tableaux EXCEL différents
Réponses
12
Affichages
774
Peter DOE
P
  • Résolu(e)
XL 2010 Travail base de données et UserForm
2 3
Réponses
40
Affichages
1 K
ChTi160
C
  • Question Question
Microsoft 365 Combobox sans doublon et avec auto complétion et liée à une autre combobox
2
Réponses
24
Affichages
889
Dranreb
E
  • Question Question
XL 2016 RechercheV + macro
Réponses
5
Affichages
323
eXten
E
  • Question Question
XL 2021 Saisies multiples
Réponses
4
Affichages
253
job75
A
  • Résolu(e)
XL 2019 Sommer colonne critère texte.
Réponses
10
Affichages
418
ALS35
A
J
  • Résolu(e)
XL 2021 insertion d'image provenant d'unecellule dans un userform
2
Réponses
22
Affichages
782
vgendron
C
  • Résolu(e)
Copier/Masquer des lignes de couleur pour alimenter un tableau
Réponses
9
Affichages
931
vgendron
D
  • Question Question
XL 2021 Afficher une valeur qu'une seule fois si un critére est atteint
Réponses
13
Affichages
1 K
JHA
J
F
  • Question Question
Microsoft 365 Problème RECHERCHEV avec plusieurs correspondances possibles pour une même valeur
2
Réponses
15
Affichages
809
floflatch22
F
  • Question Question
Microsoft 365 Récupérer le nom du combobox dès qu'il change de valeur
Réponses
2
Affichages
627
mromain
  • Question Question
XL 2016 Aide pour userform (sujet clos)
Réponses
8
Affichages
732
tactic6
V
  • Résolu(e)
XL 2019 fonction recherchev
Réponses
9
Affichages
953
DJunqueira
D
L
  • Question Question
Microsoft 365 3 Colonnes respectives
Réponses
3
Affichages
423
LEPATOCHE
L
T
  • Question Question
Listbox 14 colonnes
Réponses
6
Affichages
919
TAL
T
S
  • Question Question
Microsoft 365 Modifier des données via un Userform
Réponses
3
Affichages
675
youky(BJ)
P
  • Question Question
XL 2016 rechercheV ?
Réponses
3
Affichages
562
plozing
P
E
  • Résolu(e)
Microsoft 365 Archivage a partir de Userform
2 3 4
Réponses
48
Affichages
5 K
ChTi160
D
  • Question Question
XL 2021 Filtre Multi Critères Listview VBA
2
Réponses
21
Affichages
3 K
Dranreb
  • Question Question
XL 2016 Envoyer une plage de cellule en pcs jointe par mail via Userform
Réponses
3
Affichages
618
PatLac
Menu
Connexion
S'inscrire
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…