essai textbox vers listbox

bonjour a vous

j'essaie en vain d'envoyer la valeur de 3 textbox dans 3 colonnes d'une listebox, mais je n'arrive qu'a le faire que dans une seulle colonne avec les données qui se suivent voici le code utilisé

Code:

---

1 2 3 4 5

Private Sub CommandButton1_Click() ListBox1.AddItem TextBox1.Value ListBox1.AddItem TextBox2.Value ListBox1.AddItem TextBox3.Value End Sub

---

et aussi est ce que ce code ci dessous est bon si les données sont bien distribuées dans la listbox pour remettre la ligne qui sera doublecliquée dans les textbox afin d'en modifié une des données si nécéssaire

Code:

---

1 2 3 4 5

Private Sub ListBox1_DblClick(ByVal Cancel As MSForms.ReturnBoolean) Me.TextBox1.Text = Me.ListBox1.Column(0, Me.ListBox1.ListIndex) Me.TextBox2.Text = Me.ListBox1.Column(1, Me.ListBox1.ListIndex) Me.TextBox3.Text = Me.ListBox1.Column(2, Me.ListBox1.ListIndex) End Sub

---

merci par avance de vos sugestions

cordialement

Pascal

Bonjour,

Essais comme cela

Code:

---

1 2 3 4 5 6

ListBox1.ColumnCount = 3 ListBox1.AddItem ListBox1.List(ListBox1.ListCount - 1, 0) = TextBox1.Text ListBox1.List(ListBox1.ListCount - 1, 1) = TextBox2.Text ListBox1.List(ListBox1.ListCount - 1, 2) = TextBox3.Text

---

bonsoir Jérôme

Merci beaucoup de ton code:ccool: qui est bien conçu du moins pour mon utilisation, j'ai meme essayer l'autre code et ca marche

encore merci:ccool::ccool:

cordialement:ccool:

Pascal