souci avec combobox

[poussy67]

Bonjours le forum

J'ai un petit souci de combobox que je n’arrive pas à résoudre et je suis novice dans la vba. Quand je sélectionne dans combobox une réf cela me restitue le libellé du produit, mais quand je saisie une réf dans le combobox la il y rien qui ce passe. J'ai essayé de modifier plusieurs possibilités dans propriété du combo mais rien à faire ça ne marche toujours pas. J'aurai besoin d'un petit coup de pouce.

En vous remerciant d'avance pour votre aide

Cdt Poussy

ci joint l'exemple de mon problème

 

[Guest]

Re : souci avec combobox

bonjour Poussy,

Pour charger la combobox utiliser la propriété RowSource comme suit:

ComboBox1.RowSource = "Articles!" & Sheets("Articles").Range("B1:B" & Sheets("Articles").Range("B65536").End(xlUp).Row).Address

Pour l'évènement change:

Private Sub ComboBox1_Change()
If ComboBox1.ListIndex > -1 Then
    Label1.Caption = Sheets("Articles").Cells(ComboBox1.ListIndex + 1, 3).Value
End If
End Sub

A bientôt

 

[kjin]

Re : souci avec combobox

Bonjour,
C'est normal dans la mesure où ta combo est initialisée sur la liste REF
Si tu veux avoir le choix, il faut ajouter un contrôle intermédiaire, ici bouton d'option.
A+
kjin

 

[poussy67]

Re : souci avec combobox

Bonjour

Impécable je vous remercie pour votre aide

cdt poussy