Combo box en cascade dans userform

Bonjour,

Dans mon second combobox j'aimerais que la valeur vienne d'une recherche faites grace au premier combobox. J'ai les bonnes valeurs dans le 1er combobox mais rien ne s'affiche dans le 2ème. Je joint le code si quelqu'un à une solution, ce serait top!!

Private Sub UserForm_Initialize()

Me.StartUpPosition = 2

cbo_marques.RowSource = "MoteurIOT!cbo_marques": cbo_marques.ListIndex = 0

AffCombo_12

End Sub

Private Sub AffCombo_12()

Dim MC As Range

Set MC = MoteurIOT.Range("combo1vers2").Find(cbo_marques.Value)

End Sub

Private Sub cbo_marques_Change()

AffCombo_12

End Sub

Merci à ceux qui prendront le temps pour m'aider :) ,

Bonne journée

Bonjour Trbl, bonjour le forum,

Sans le fichier difficile de vérifier... Toutefois il manque la ligne qui demande d'afficher la valeur trouvée :

Private Sub AffCombo_12()
Dim MC As Range
Set MC = MoteurIOT.Range("combo1vers2").Find(cbo_marques.Value)
Me.cbosecondecombobox.Value = MC.Offset(?, ?).Value  '(nom de la ComboBox à adapter et offset à adapter)
End Sub

Mais dans ce cas une simple TextBox suffirait...

Rechercher des sujets similaires à "combo box cascade userform"