Point séparateur de décimal pas Virgule [VBA]

Résolu/Fermé
commentcamarcheeay Messages postés 667 Date d'inscription mercredi 24 février 2010 Statut Membre Dernière intervention 30 mars 2020 - 5 mai 2010 à 19:18
 khaled - 14 août 2013 à 06:21
Salut tout le monde,

J'ai remarqué quelque chose qui m'a gêné un peu.
- Dans le code VB, quand on écrit 1.2, elle est considéré comme nombre
- Quand j'écris par exemple c = CStr(1.2) la valeur de c devient c = 1,2 avec une virgule
- Pour b = CDbl(1.2) tout va bien
- Mais quand j'écris b = CDbl("1.2") une érreur d'incompatibilité de type se déclenche. Il faut que j'écrive b = CDbl("1,2") avec une virgule, pas un point.

Est ce que quelqu'un saurait comment ne prendre en compte que les points comme séparateurs de décimales? Je ne veux pas arriver au point de devoir utiliser une fonction telle que replace(text, ",", ".")

Je vous remercie d'avance!



2 réponses

eriiic Messages postés 24600 Date d'inscription mardi 11 septembre 2007 Statut Contributeur Dernière intervention 21 octobre 2024 7 239
5 mai 2010 à 19:35
Bonjour,

essaie en remplaçant la , par le . dans les parametres régionaux (panneau de config).
Attention c'est défini en 2 endroits : nombres et monnaie
eric
6
commentcamarcheeay Messages postés 667 Date d'inscription mercredi 24 février 2010 Statut Membre Dernière intervention 30 mars 2020 86
5 mai 2010 à 19:49
Merci beaucoup eriiic,
C'était exactement ce qu'il me fallait!
0
ch=textbox.text
ch = Replace(ch, ";", ".")
textbox.Text = ch
1