2 textbox pour alimenter cellule

Bonjour
dans un userform, j'ai 2 textbox et un bouton valider

l'idée est que le premier chiffre de la textbox1 additionne en fonction de sa valeur le nombre de la textbox2 autant de fois que la valeur de la textbox1 en formule dans la cellule active.

exemple si textbox1 =3 et textbox2 = 4 que la formule de la cellule active soit
+4+4+4

je n'y arrive pas..

merci!

julien

Bonjour djmousic,

peut-être

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16

Dim Formule as String, i as long, j as long Formule = "=" if Isnumeric(textbox1.text) and isnumeric(textbox2.text) then i = clng(textbox1) if cdbl(textbox2.text)>0 then for j =1 to i formule = formule & "+" & textbox2.text next j else for j =1 to i formule = formule & textbox2.text next j end if Activecell.Formula = Formule end if

---

nikel !!
merci beaucoup !