Combobox 2 colonnes, sélectionner un item selon la valeur de la colonne 2

[blord]

Bonjour à tous,

Dans un formulaire je charge un combobox à 2 colonnes avec des données qui ressemblent à ceci :

COL1 COL2
À faire 3
Nouveau 8
Terminé 4
Suspens 9

Dans un textbox, je reçois une valeur numérique qui correspond à une des valeurs de la deuxième colonne du combobox.

Ce que je cherche à faire, lorsque le textbox reçoit la valeur, c'est d'afficher dans le combobox, la ligne qui corrspond à la valeur du textbox.
Par exemple, si le textbox reçoit la valeur 4, je veux que le combobox affiche Terminé...

Voir le fichier ci-joint...

Merci pour votre aide....
Blord

 

[MichD]

Re : Combobox 2 colonnes, sélectionner un item selon la valeur de la colonne 2

Bonjour,

Dès que tu quittes ou tu valides la valeur du Textbox,
le combobox affiche ce que tu demandes ou rien.

Retour de ton fichier.

Je n'avais pas vu ton bouton de commande, tu pourrais réunir le code comme suit:

Private Sub CommandButton1_Click()
    
Dim X As Long, T As Variant
TextBox1.Value = 4
If IsNumeric(Me.TextBox1) Then
    X = Val(Me.TextBox1)
    T = Application.Match(X, Rg.Columns(2), 0)
    If IsNumeric(T) Then
        Me.ComboBox1.ListIndex = T - 1
    Else
        Me.ComboBox1.ListIndex = -1
    End If
End If
End Sub

 

[blord]

Re : Combobox 2 colonnes, sélectionner un item selon la valeur de la colonne 2

Bonjour MichD,

Merci beaucoup pour ta réponse qui me convient parfaitement et pour le complément pour le chargement du combobox... c'est très apprécié !

Bonne fin de soirée.

Blord