Résolu excel et programation

[Francky_2]

bonjour voila j'essai de faire une multiplication d'une tbox par le contenu d'une cellule

Private Sub SpinButton1_Change()
TextBox1 = SpinButton1.Value
TextBox101 = TextBox1.Value * F4
End Sub

pouvez vous m'aider svp

 

[drul]

Salut, une textbox est par defenition du text ...
Textbox101=val (textbox1)*range ("F4").value

 

[Francky_2]

bonjour,
voila j'ai fait le code suivant:

Private Sub SpinButton1_Change()
TextBox1 = SpinButton1.Value
TextBox101 = Val(TextBox1) * Range("F4").Value
Me.TextBox101.Value = Format(Me.TextBox101 & Chr(KeyAscii), "#,###.## €")
End Sub


mais losque ma cellule 'f4' =0.1 et textbox1 a une valeur de 1
le resustat de ma texbox101 est .1 et non 0.1

merci de vos reponses

francky

 

[drul]

Re,
essaye:
Me.TextBox101.Value = Format(Me.TextBox101, "#,##0.00 €")

 

[Francky_2]

merci ca marche

 

[drul]

De rien. Tu peux clore le sujet stp.