gestion d'un userform

Bonjour,

je suis débutante en vba, j'aurais besoin d'un petit coup de pouce..

j'ai crée un Userform contenant une textbox,une listbox et un bouton :

- j'aimerais que la textbox soit associée au bouton , de façon à ce que l'on puisse saisir du texte dans la textbox et qu'une fois que l'on clique sur le bouton, ma saisie se transfert dans la liste box
- j'aimerais également que l'on puisse par la suite double cliquer sur un élément dans la listbox pour le supprimer

pourriez vous m'aider?

Merci d'avance :)

Bonjour Excel, bonjour le forum,

Tu adapteras le code...

Code:

---

1 2 3

Private Sub CommandButton1_Click() Me.ListBox1.AddItem Me.TextBox1.Value End Sub

---

et

Code:

---

1 2 3 4 5 6

Private Sub ListBox1_DblClick(ByVal Cancel As MSForms.ReturnBoolean) Dim I As Integer For I = Me.ListBox1.ListCount - 1 To 0 Step -1 If Me.ListBox1.Selected(I) = True Then Me.ListBox1.RemoveItem (I) Next I End Sub

---

Bonjour

autres codes

Code:

---

1 2 3 4 5 6 7 8 9 10

Private Sub CommandButton1_Click() 'pour ajouter le texte dans la liste If TextBox1 <> "" Then ListBox1.AddItem TextBox1 TextBox1 = "": TextBox1.SetFocus 'pour autre ajout éventuel End If End Sub   Private Sub ListBox1_DblClick(ByVal Cancel As MSForms.ReturnBoolean) ListBox1.RemoveItem (ListBox1.ListIndex) End Sub

---

Super cela fonctionne merci a vous deux! :)