listbox et textbox

[Pensinf4204]

bonjour,
J'ai crée un Userform avec une listbox alimenter par les cellule a12:a14 et a19:a21 etc tout cela apparait grâce a des option buttons
Jusque la tout va bien
lorsque je clique dans ma listbox deux textbox apparaissent
Jusque la tout va bien
Et la cela ce gate pour moi
Je voudrais lorsque j'ai cliquer dans la 2eme ligne de ma listbox lorsque je rentre des données dans mes textbox l'info soit écrite en face de la ligne correspondante sur la feuille
EX: Vache 'dans listbox info prise en A13 donc 2eme ligne de ma listbox !!
120€ 'info du textbox1 a mettre en b13
352 Kg 'info du textbox2 a mettre en c13
Voila j'espère que j'ai été assez clair
En faite quelque soit la ligne sélectionnée dans ma listbox
Les infos iront s'écrire au bon endroit sur la feuille
Merci de votre aide

 

[Bebere]

Re : listbox et textbox

bonsoir Pensinf
je reprends ton explication
EX: Vache 'dans listbox info prise en A13 donc 2eme ligne de ma listbox !!
120€ 'info du textbox1 a mettre en b13
352 Kg 'info du textbox2 a mettre en c13

dim L as integer'variable index de ligne
l=listbox1.listindex+12'2eme ligne listbox=1,commence à 0
With sheets("NomDeTaFeuille")'à adapter
.range("A" & l).value=listbox1.value
.range("B" & l).value=cdbl(textbox1.value)'cdbl change text en numeric
.range("C" & l).value=cdbl(textbox2.value)
end with

à bientôt

 

[Pensinf4204]

Re : listbox et textbox

Un grand merci a toi Bebere
Cela est tout à fait ce que je cherchais
Je n'avais pas besoin que le renseignement de la listbox s'écrive dans la feuille
j'ai rectifier cela "pas grand chose au regarde de reste"
Mais je garde l'info sous le coude cela peu servir plus tard
Encore merci