Problème de Saisie Format Monétaire dans TextBox

[MuscatMimi]

Bonsoir a toutes et a Tous

J'ai un soucis de saisie de format monétaire dans des TextBox

Actuellement quand je saisie dans ma premiére textBox 10.20 €

j'obtiens 0.43 € ,,quand je clique dans la textBox suivante

malgré le code ci dessous
J'avoue pas comprendre

Private Sub TextBox3_Exit(ByVal Cancel As MSForms.ReturnBoolean)
On Error Resume Next
Me.TextBox3 = Format(Me.TextBox3, "# ##0.00 €")
End Sub

Merci a tous a l'avance

Cordialement

 

[jp14]

Re : Problème de Saisie Format Monétaire dans TextBox

Bonjour

A tester remplacer le point par une virgule, au niveau du textbox.

TextBox3.value = replace(TextBox3.value,".",",")
Si dans le textbox on a un point on obtient 0,43 €
et 10,20 € avec la virgule

JP

 

[DIGGERJACK]

Re : Problème de Saisie Format Monétaire dans TextBox

Bonsoir le forum, vaucluse immo, jp14

Format à tester "#,##0.00 €"

Bonne soirée

 

[MuscatMimi]

Re : Problème de Saisie Format Monétaire dans TextBox

Bonsoir
Merci a tout les deux
mais rein n'y fait

A++++++++