Bonjour à tous
Et salut Jeny
Soit un USF avec 3 TextBox et 1 CommandButton
Option Explicit
'par défault, tout ce qui est entré dans une textbox est du texte
'je déclare donc 2 variables string
Dim t1, t2 As String
'qui seront transformées en nombres sur lesquels je pourrai faire des opérations
Dim M1, M2 As Currency
Private Sub CommandButton1_Click()
t1 = TextBox1.Value
M1 = CCur(t1) 'je transforme la variable t1 texte en currency M1
t2 = TextBox2.Value
M2 = CCur(t2) 'idem
TextBox3.Value = M1 * M2 'je peux alors faire mes opérations
End Sub
Et ATTENTION, la conversion ne marchera pas si ma chaîne de texte comporte une lettre, ou un point à la place d'une virgule comme séparateur (because paramétrage de l'écriture des nombres en français).
par contre, les espaces ne sont pas genants. Ils sont supprimés lors de la conversion.
bon, jarrête là... c'est pas facile de taper avec un doigt et de bercer ma julie (3mois) de l'autre. lol...
@+ peper-eliot