Convertir chiffre texte en nombre

[Saumon80]

Bonjour

Je vous sollicite car j'ai crée un fichier auquel j'ai ajouté un USERFORM et du code VBA
Lorsque les chiffres renseignés dans l'USERFORM se reportent dans le tableau prévu à cet effet elles le sont sous forme de texte et non sous forme de nombre

Comment est il possible une fois les données reportées dans le tableau de les convertir automatiquement en nombre?

Merci d'avance

 

[Pierrot93]

Re : Convertir chiffre texte en nombre

Bonjour,

il faut convertire la donnée contenue dans le "textbox" et stockée comme un "string" (chaine de caractère), regarde ceci :

Range("A1") = Val(Replace(TextBox1, ",", "."))

bonne journée
@+

 

[Saumon80]

Re : Convertir chiffre texte en nombre

D'accord et je doit déclarer textbox1 en tant que quoi?

 

[Pierrot93]

Re : Convertir chiffre texte en nombre

Re,

D'accord et je doit déclarer textbox1 en tant que quoi?

Bah... "textbox1" c'est l'objet placé sur ton USF dans lequel tu saisis tes nombrers.... le nom est à adapté bien sur...

 

[Saumon80]

Re : Convertir chiffre texte en nombre

Le probléme c'est que je sait pas trop ou placer la ligne de code dans le userform ou dans un autre module?

Voici le fichier pourrais tu m'indiquer ou placer la ligne ?

 

[Pierrot93]

Re : Convertir chiffre texte en nombre

Re,

dans cette procédure :

Private Sub btn_ok_Click()

tu remplaces :

Range("E" & Ligne) = TextBox1

par :

 Range("E" & Ligne) = Val(Replace(TextBox1, ",", "."))

ce, sur le code du textbox concerné....

 

[Saumon80]

Re : Convertir chiffre texte en nombre

Super! Sa marche merci beaucoup pour ton aide et bonne année 2015!