Discussion :

[karim19]

Bonjour,

je cherche à convertir une variable String en nombre à 3 Decimales

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

quantitevendue = CDbl(TextBox4.Value)

une âme charitable

Bien Cdt

[Krovax]

Bonjour, 3 décimal tu peux rester en single pas besoin de double
La fonction round permet les arrondi

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
Dim a As Single
a = Round(CSng("2,334455"), 3)
MsgBox a

à adapter, attention avec les , et les .

[karim19]

Bonsoir Krovax

ma variable est de type String, j'insère dans une Textbox par exple , cette valeur 860 ( par défaut, une valeur dans une Textbox est forcément String, ou y at'il un moyen de la transformer en 3Dec dès insertion ?)

Je voudrais la convertir en nombre à 3 decimales, il me semble que ton code le permet seulement pour une variable en expression numérique ?

bien Cdt

[Pierre Fauconnier]

Pourquoi ne pas essayer la solution de Krovax, d'abord?

[karim19]

bonsoir

je l'ai fait, mais je ne dispose toujours pas de la conversion à 3dec ( je pense qu'elle est du fait ( à mon avis ) de la nature de la variable insérée String .

ma valeur affichée est toujour un chiffre entier

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

quantitevendue = CDbl(TextBox4.Value)

à l'exemple 860


bien Cdt

[aalex_38]

Est-ce que c'est ça que tu veux ? :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

quantitevendue = CDbl(TextBox4.Value) / 1000

[Pierre Fauconnier]

Ben, si tu saisis une valeur entière, tu ne sais pas la convertir en nombre à trois décimales, alors...

Tu veux juste modifier l'affichage pour voir 3 zéros derrière la virgule, je suppose.

Tout dépend de l'endroit ou tu stockes cette valeur...

Dans une cellule? Format de cellule/Nombre

Dans un textbox? format("2","0.000") par exemple