Détecter le séparateur décimal de Windows sans API
Tout est dans le titre : comment savoir quel est le séparateur décimal du panneau de configuration de Windows (généralement le point ou la virgule), sans passer par les API ?
Principe
Une petite fonction fera l’affaire. A recopier dans un module standard, comme d’habitude.
Le principe consiste à convertir un nombre décimal quelconque – par exemple 1/2
– en chaîne, et à lire le séparateur obtenu (en deuxième position dans la chaîne, du coup).
1 2 3 |
Function DecimalSep() As String DecimalSep = Mid$(1 / 2, 2, 1) End Function |
Tester le code
Vous pouvez la tester directement dans la fenêtre Exécution :
- Faites apparaître la fenêtre Exécution (
CTRL
+G
). - Tapez quelque chose comme :
? DecimalSep()
- Appuyez sur
[Entrée]
pour valider.
Le séparateur correct devrait s’afficher. Bien sûr, la fonction a plus d’intérêt à long terme, dans un contexte VBA.
Tresco > Il s’agit plutôt d’une question sur cet article, j’imagine ?
Bonjour,j’ai suivi avec intérêt le tut,mais j’ai des difficultés à la ligne de code suivant:
« dblEuro = dctDevises.Item(« rates »).Item(« EUR ») »
j’ai analyser ,je ne sait à quoi est du ce là,vous remerciant déjà des informations si utiles que vous mettez en notre disposition,pourriez vous m’aider à décanter cette situation,Svp
Tresco