Bonjour,

Non, non, on ne rigole pas, je vais craquer là je crois

J'ai essayé tout ce qui mets passé par la tête mais là, voilà la dernière mouture, en plus ça doit être c** comme la lune :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
Private Sub CLIENT_MAIL_KeyPress(KeyAscii As Integer)
If Chr(KeyAscii) = "," Or KeyAscii = 46 Then Chr(KeyAscii) = "."
End Sub
J'obtiens le message d'erreur

Erreur d'execution '424'

Objet requis
J'ai mis le num dot (46) car le point du clavier numérique m'affiche une virgule et me retourne la valeur 46 (Vu avec espion)

Sachant que je ne peux modifier les options régionales !