Discussion :

[alex santus]

Bonjour a tous,

je veux insérer dans une listbox a trois colonne les valeur d'une combox et des deux textbox quand j appuie sur un command bouton.

pour la premier ligne aucun problème

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
UserAchat.ListBoxAchat.AddItem
 
ListBoxAchat.Column(0, 0) = ComboBoxProduit
ListBoxAchat.Column(1, 0) = TextBox1
ListBoxAchat.Column(2, 0) = TextBox2

mais je n arrive pas a répéter l opération pour creer une second ligne.

si quelqu un pourrai juste m aiguiller sur la bonne manière.

d avance merci

[rvtoulon]

Slt,
j'ai testé comme ceci et çà fonctionne :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
Private Sub CommandButton1_Click()
i = UserAchat.ListBoxAchat.ListCount
 
UserAchat.ListBoxAchat.AddItem
ListBoxAchat.Column(0, i) = ComboBoxProduit
ListBoxAchat.Column(1, i) = TextBox1
ListBoxAchat.Column(2, i) = TextBox2
End Sub

Dis moi si c'est bon.
A+

[alex santus]

Salut,

génial ca fonction nickel, c était ci simple, juste une petit ligne a rajouter

Merci pour ton aide précieuse.

bonne journée