Liste déroulante dans formulaire à plusieurs variables

Bonsoir,

Je bloque sur une VBA que je tente de faie pour créer dans un formulaire une liste déroulante qui dépend de 2 variables. Pour le moment, j'ai réussi à créer cette liste en fonction d'une variable mais pas plus... Je ne sais pas comment je dois ajouter la seconde variable qui se trouve dans cboMarque1 et dont le texte sera soit "MANITOU" soit "TOYOTA"

Si quelqu'un peut m'aider là dessus ?

Merci d'avance

Ci dessous mon code actuel :

Private Sub cboMateriel1_Change()

If cboMateriel1 = "CHARIOT ELEVATEUR INDUSTRIEL FRONTAL ELECTRIQUE" Then

cboType1.List() = Array("8FBET15", "8FBET16", "8FBMT16", "8FBMT18", "8FBMT20", "8FBMT25", "8FBMT50", "9FBMT60", "9FBMT80", "ME 315 C", "ME 315", "ME 316", "ME 318", "ME 320", "ME 418", "ME 420", "ME 425", "ME 425 C", "ME 430", "ME 435", "ME 440", "ME 445", "ME 450")

ElseIf cboMateriel1 = "CHARIOT ELEVATEUR INDUSTRIEL FRONTAL THERMIQUE" Then

cboType1.List() = Array("02-8FDF25", "52-8FDF25", "02-8FDF30", "52-8FDF30", "02-8FDJF35", "52-8FDJF35", "8FG70N", "8FDN35", "8FD70N", "MI 15 D", "MI 15 G", "MI 18 D", "MI 18 G", "MI 20 D", "MI 20 G", "MI 25 D", "MI 25 G", "MI 30 D", "MI 30 G", "MI 35 D", "MI 35 G", "MI 40 D", "MI 40 G", "MI 45 D", "MI 45 G", "MI 50 D", "MI 50 G", "MI 50 LD", "MI 50 LG", "MI 60 D", "MI 60 G", "MI 70 D", "MI 70 G", "MI 80 D", "MI 100 D")

ElseIf cboMateriel1 = "GERBEUR ELECTRIQUE" Then

cboType1.List() = Array("SPE120", "SPE120XRD", "SPE160", "SPE160L", "SPE200D", "SPE200DN", "SWE080L", "SWE100", "SWE120", "SWE120L", "SWE120S", "SWE120XR", "SWE140L", "SWE140S", "SWE145", "SWE160L", "SWE200D", "ES 410", "ES 412", "ES 614", "ES 616", "ES 720", "ES 725", "ES 820")

End If

End Sub

Bonjour

Tu devrais joindre ton fichier...

Bye !

Oui je me doute que ça serait mieux mais j ai des infos confidentielles dedans... en fait je me demande s'il existe une formule du type "If"...."and if"..."then"...

Rechercher des sujets similaires à "liste deroulante formulaire variables"