Remplir TxtBx en lien avec ListBx

Bonjour le forum

Je viens vers vous pour petit coup de pouce svp,

Sur mon UserForm1, je click sur ListBox1 pour sélectionner un item, renseigne TxB1 puis valide avec CommandButton1 qui remplit la ListBox2 (tout ça j'y suis arrivé).

Ce que je n'arrive pas à faire, j'aimerai au click (commanbutton1) renseigner les txtB2 à 8 de la quantité des items des lors que ce dernier est sélectionné.

par ex :

ListB1 --> sélection de Matériel_ 2 -->

TxtBx1 --> inscrit quantité (4 par ex) -->

CommandButton1 --> click, cela renseigne la ListB2

C'est la que j'aimerai renseigner en même temps les TxtBx,

Si Matériel_1 est sélectionné alors TxtB2 = qté

Si Matériel_2 est sélectionné alors TxtB3 = qté

Si Matériel_3 est sélectionné alors TxtB4 = qté

Si Matériel_4 est sélectionné alors TxtB5 = qté

ect.....

puis de pouvoir effacer si on viens à supprimer une ligne du ListB2 par Dbclick.

Je joint un fichier exemple pour plus de compréhension en espérant être le plus explicit possible.

Merci à vous par avance

Cordialement

Bonjour

A priori j'aurai trouvé une solution pour renseigner les TxtBx 2 à 8, je sais pas si c'est la meilleur solution mais ça marche.

voila le code sur CommandButton1 :

Select Case ListBox1.Text
  Case "Matériel_1"
     plage = Me.TextBox1
     Me.TextBox2 = plage
  Case "Matériel_2"
     plage = Me.TextBox1
     Me.TextBox3 = plage
  Case "Matériel_3"
     plage = Me.TextBox1
     Me.TextBox4 = plage
'ect...
 End Select

Par contre sur le doubleclick de la ListBox2, je ne trouve pas la solution.

J'ai tenté ça,

Select Case ListBox2.Text
  Case "Matériel_1"
     Me.TextBox2 = "" 
  Case "Matériel_2"
     Me.TextBox3 = ""
  Case "Matériel_3"
     Me.TextBox4 = ""
'ect...
 End Select

Si vous pouviez m'aider la dessus, merci par avance

Cordialement

Re

J'ai trouvé, le code est bon sauf qu'il était mal placé

Cdlm