Discussion :

[alex santus]

Bonjour,
Je voudrai avoir une petite aide sur le code a écrire pour :

j ai un userForm, avec a droite une liste box reprenant mais article existant
et a gauche un textBox ou je rentre mais nouveau article.

j aurai besoin du code, que si je pioche un article dans ma listBox il s inscrit a droite dans le textBox et pouvoir ainsi le modifier sans devoir créer un nouvelle article

j espère que mon explication est assez clair et d avance merci pour vos réponse

Alex

[laetitia]

bonjour alex santus le forum sans plus d' infos
suppose remplissage de la listbox de a2:a & x une seule colonne un bouton pour modifier . une textbox1

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
Option Explicit
Dim t As Variant
Private Sub CommandButton1_Click()
Cells(ListBox1.ListIndex + 2, 1) = TextBox1.Value
t = Range("a2:a" & Range("a65536").End(xlUp).Row): ListBox1.List = t
End Sub
Private Sub ListBox1_Click()
TextBox1 = ListBox1.List(ListBox1.ListIndex)
End Sub
Private Sub UserForm_initialize()
t = Range("a2:a" & Range("a65536").End(xlUp).Row): ListBox1.List = t
End Sub

[alex santus]

Bonjour Laetitia,
Merci pour ta solution, c était simple mais suis un peu nouveau.
bonne journée