Discussion :

[dlight]

Bonjour à tous.

J'ai un userform dans lequel j'ai plusieurs textbox. Dans ces textbox, je demande un montant.

Si le montant inscrit dans le textbox est de 666.66 par exemple, le transfert fonctionne.
Pour un montant de 6666.66, le montant est stoké sous un format texte. Je ne peux donc pas faire aucun calcul avec cette celulle.

Voici le code utilisé:

Code :

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

1
2
3
4
Private Sub TextBox4_AfterUpdate()
TextBox4.Value = Format(TextBox4.Value, "# ##0.00")
 
End Sub

Puis par un bouton :

Code :

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

[VMA1] = TextBox4.Value

Quelqu'un peu m'expliquer ce qui ne va pas ...

Merci à l'avance

Dlight

[mercatog]

Code :

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

Range("A1").value=Val(TextBox4.value)

Attention quand même au séparateur décimal

[dlight]

Une fois de plus mercatog, d'une rapidité à couper le soufle

Merci de prendre le temps de nous répondre.


Dlight