Remplacer un caractère après saisie dans TextBox
Bonjour,
Je souhaiterais, après la saisie d'un montant X dans une TextBox de mon UserForm, remplacer la virgule par un point (en vérifiant d'abord la présence d'une virgule dans le montant saisit).
J'ai bien tenté ca...
Code:
1
2
3
4
5
6
7
| Private Sub Amount1_AfterUpdate()
If InStr(1, Controls("Amount1").Text, ",") <> 0 Then
Controls("Amount1").Text.Replace What:=",", Replacement:="."
End If
End Sub |
...avec plein d'espoir mais évidemment, comme je le craignais, ca ne marche pas.
Quelqu'un aurait-il une petite idée ?
