vba : faire en sorte que la décimale soit un point

[miguelangelo]

Bonjour,

j'utilise une userform dans laquelle j'informe des montants
je voudrais que la décimale soit un point au lieu d'une virgule..et ce quel que soit l'ordinateur.

si dans les options régionales, il est indiqué que la décimale est marquée par une virgule, je voudrais que dans ce fichier, ce soit le point.

Pouvez vous m'indiquer la marche à suivre ??

merci

 

[Dull]

Re : vba : faire en sorte que la décimale soit un point

Salut miguelangelo, le Forum

essaye avec la Fonction Replace
ex: Si le chiffre à renseigner est dans le TextBox1

Private Sub TextBox1_Change()
TextBox1.Value = Replace(TextBox1, ",", ".")
End Sub

Bonne Journée

 

[Pierrot93]

Re : vba : faire en sorte que la décimale soit un point

Bonjour Miguelangelo, Dull🙂

une autre solution avec l'événement "KeyPress" :

Private Sub TextBox2_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)
    If KeyAscii = 44 Then KeyAscii = 46
End Sub

bonne journée
@+

 

[miguelangelo]

Re : vba : faire en sorte que la décimale soit un point

je verifie tout ca ce soir !!

merci pour vos réponses.