Conversion point en virgule et format d'une Textbox

Bonjour le Forum,

Je tente de faire une Gestion multicompte en VBA, mais étant novice, je rencontre 2 problème sur une textbox pour la saisie d'un montant, celui ci une fois saisie dans le userform2, s'inscrit dans sa feuille concernée.

je pensai que je trouverai ma solution dans les différents post du forum, mais n' y arrivant pas j'ai décidé de le soumettre.

le 1 èr problème concerné c'est que sur le userform, lorsque nous saisissons un nombre avec 2 chiffres après la virgule, il le saisit avec 1 point alors que pour la prise en compte des calculs à venir sur la feuille, cela doit être une virgule. j'ai essayé avec la syntaxe "Replace", mais rien n' y a fait.

Le 2 ème problème , il ne retranscrit pas tel quel, Exemple , si je saisis 614,62 dans la textbox3, il arrondi et retranscrit 615,00 sur la feuille.

j'ai essayé avec la syntaxe format (textbox3, 0.00 # ## ), mais rien n'y fait.

si quelqu'un peut y regarder, je l'en remercie par avance;

je joins le fichier.

Cordialement;

Mamarus

Bonjour Mamarus,

J'ai modifié le format de la Textbox3 :

If (TextBox3) > Format(TextBox3, "0.00") Then

et supprimer le Cdbl devant Textbox3.

Le format TEXTBOX3 est défini au début et utilisé par la suite.

Il y a sûrement mieux, regarde et dis-nous.

Cordia5

Bonjour,

Tu y étais presque, en utilisant la fonction "Val"...

....
If Val(Me.TextBox3) > 0 Then
    Cells(4, 1) = TextBox1.Value: 'Date
    Cells(4, 2) = TextBox2.Value: ' Opération
    Cells(4, 3) = Val(Me.TextBox3) 'Montant
    .....

Bonne journée

Bonjour Cousinhub et CORDIA5,

En croisant vos 2 réponses, j'ai réussi à le corriger,

Je vous en remercie,

Cordialement,

Mamarus