Comment recuperer les parametre regionaux dans VBA

cs_modesteMax Messages postés 2 Date d'inscription vendredi 1 août 2003 Statut Membre Dernière intervention 26 janvier 2006 - 26 janv. 2006 à 15:59
kalobit Messages postés 169 Date d'inscription mardi 15 juillet 2003 Statut Membre Dernière intervention 7 avril 2008 - 26 janv. 2006 à 17:50
salut je veux uitliser dans mon code le separateur des millier qui a ete configurer dans windows mais je ne sais pas quelle instruction VBA peut me permetre acceder au registre
merci

1 réponse

kalobit Messages postés 169 Date d'inscription mardi 15 juillet 2003 Statut Membre Dernière intervention 7 avril 2008 2
26 janv. 2006 à 17:50
il faut utiliser les api pour ça.
sinon, tu colle un nombre décimal dans un cellule, et récupère la chaine de caractères et tu test si c'est le point ou la virgule

sub SepDec()
lastvalue = activecell.formula
activecell.value = 1.5
valeur = activecell.value
if instr(valeur, ",")<>0 then
msgbox "Le séparateur décimale est la virgule"
else
msgbox "Le séparateur décimal est le point"
end if
activecell.formula = lastvalue
end sub

+++
[mailto:K@lobit K@lobit]
0