gestion de deux ListBox

Bonjour le forum
Voilà, sur un userform, je dispose de deux ListBox contenant, à l'initialisation, exactement les mêmes valeurs.
Je souhaiterai que, lorsque je sélectionne un élément de LB1, cet élément n'apparaisse pas dans LB2.
Là où je bloque, c'est que, si j'ai choisi un élément dans LB1, puis un élément dans LB2, et si je modifie l'élément dans LB2, l'élément que j'avais choisi en premier lieu sur LB2 ne réaparait pas dans LB1, alors que justement, je souhaiterai qu'à tout moment, dans chaque LB, tous les éléments soient disponibles, exeption faite de celui sélectionné dans l'autre LB

Comme je ne suis pas sûr d'être très clair, j'ai mis un fichier excel en exemple

Est-ce que quelqu'un pourrait me donner un coup de main svp?

merci d'avance

Salut,

Si j'ai tout bien compris, ça devrait faire l'affaire :

Code:

---

1 2 3 4 5 6 7 8 9

Private Sub ListBox1_Change() ListBox2.List = liste For i = 0 To ListBox2.ListCount - 1 If ListBox2.List(i) = ListBox1.value Then ListBox2.RemoveItem (i) Exit For End If Next i End Sub

---

et

Code:

---

1 2 3 4 5 6 7 8 9

Private Sub ListBox2_Change() ListBox1.List = liste For i = 0 To ListBox1.ListCount - 1 If ListBox1.List(i) = ListBox2.value Then ListBox1.RemoveItem (i) Exit For End If Next i End Sub

---

Effectivement c'était tout bête et ça marche parfaitement

merci beaucoup et bonne journée