4 combobox cascade

bonjour à tous,

j'ai un soucis de combobox en cascade, les comboboxs s'alimentent par la combobobx precedentes et je sais pas pourquoi les 3 premieres marchent tres bien la 4eme pas alimenter ????

je joints le fichier en piéce jointe si quelqu un a une idée je suis preneur

bonne journee a tous

Bonjour,

essaye cela au changement de la 3ème ConboBox

Private Sub ComboBox3_Change()
  Set Mondico = CreateObject("Scripting.Dictionary")
  For Each C In Range(f.[A2], f.[A65000].End(xlUp))
    If C.Offset(, 1) = Me.ComboBox2 And C = Me.ComboBox1 And C.Offset(, 2) =Me.ComboBox3 Then  Mondico(C.Offset(, 10).Value) = C.Offset(, 10).Value
   Next C
   Me.ComboBox4.List = Mondico.items
   Me.ComboBox4.ListIndex = -1
End Sub

Fait un essai avec la famille matériel, Article M0002 et Désignation PINCE A SIPHON NON GAINEE

Bonne Journée

merci merci merci dl 13

3 jours que je cherche et la miracle ca marche un grand merci

et en plus super rapider

mille fois merci

Re fred82700,

Heureux d'avoir pu te rendre service mais c'est JB qu'il faut remercier

pense à mettre résolu

Bonne journée