Re : Combobox cascade- Adaptation formule
re Bonjour
Pour le premier point:
a priori les valeurs a faire afficher en combo 5 proviennent de la colonne F.
Quand vous chargez votre tableau vous ne prenez que les colonnes B à E !! :
a = f.Range("B2:E" & f.[A65000].End(xlUp).Row).Value
Par ailleurs dans Private Sub ComboBox4_click(), le test entre la combo 4 et a(i,4) n'est jamais vrai puis l'un est numérique et l'autre de type string. Donc:
If a(i, 1) = Me.ComboBox1 And a(i, 2) = Me.ComboBox2 And a(i, 3) = Me.ComboBox3 And a(i, 4) = Val(Me.ComboBox4) Then mondico(a(i, 5)) = ""
A+
Edit : il n'y avait pas d'erreur sur a(i, 5) qui n'existait pas puisque le test étant toujours faux l'instruction mondico(a(i, 5)).... n'était jamais exécutée