recup textbox

[Pensinf4204]

Bonjour
Voila j'ai créé et userform avec un textbox qui me renseigne une listbox lorsque je clic dans la listbox j'obtiens le renseignement rechercher (un prix)
Moi je voudrais que si j'affiche ce prix dans un textbox (sa je maitrise)
lorsque je clic sur un bouton le prix modifier ou non de ce textbox remplace le prix déjà écrit dans la feuille (ingrédients) à la ligne correspondante a la listbox
ex: je select Dinde = un prix je modifie ou non dans textbox et l'article je met a jour
je joint le fichier
Merci de votre aide

 

[BERRACHED said]

Re : recup textbox

Salut,Pensinf4204

tu doit ajouter l'option " Modification" pour pouvoir modifier la base de données

Cordialement

 

[kjin]

Re : recup textbox

Bonsoir,
La ligne bleue te permettra de mettre à jour ta liste
Par contre je ne comprends pas la suite du code

Private Sub Copie_Click()
Dim Vindex
Vindex = ListBox1.ListIndex
[COLOR="Blue"]Sheets("ingredients").Cells(C.Row, 2) = Prix[/COLOR]
ActiveCell = ListBox1.List(Vindex)
ActiveCell.Offset(0, 3) = Prix
'ActiveCell.Offset(0, 3) = Label11
ActiveCell.Offset(1, 0).Select
'ici je remets le curseur en textbox1
TextBox1.SetFocus
End Sub

A+
kjin

 

[Pensinf4204]

Re : recup textbox

Merci a vous deux
sa marche super
BERRACHED said je ne comprend pas l'option "modifcation" si je pouvais avoir un exemple merci