Bonjour,
Dans un champ monétaire, lorsque je tape plus d'une virgule pour les décimales, j'obtiens le message d'Access :
Valeur non valide pour ce champ.
Vous avez peut-être entré du texte dans un champ numérique ou un nombre supérieur à ce que permet le paramètre de la propriété TailleChamp.
Je souhaiterais qu'il soit impossible d'encoder plus d'une virgule dans le champ.
J'ai essayé ce code mais il est toujours possible d'encoder plus d'1 virgule.
Pourriez-vous m'aider à solutionner ce problème svp ?
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5 Private Sub Montant_KeyPress(KeyAscii As Integer) If KeyAscii = 44 And InStr(Me.Montant, ",") > 0 Then KeyAscii = 0 End if End Sub
Partager