Discussion :

[yonnel]

Bonjour,

Je réalise en ce moment une petite application d'analyse des ventes pour des amis suisses.

Avant de lancer son analyse l'utilisateur peut choisir s'il veut réaliser l'analyse en euros (€) ou en francs suisses (CHF), indépendamment des paramètres régionaux de sa machine.

Je n'ai aucun problème pour convertir les valeur. Mais il me faut ensuite afficher la bonne unité dans les requêtes de résultats.

Je passe donc par le code pour mettre à jour le format des champs en question, en mettant à jour la valeur de

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

querydef(x).fields(y).property("Format").value

Cela marche presque...
J'ai cependant un petit soucis que je n'arrive pas à expliquer...

Lorsque je veux mettre par example le format à #.##0,00" CHF";#.##0,00\-" CHF" en faisant

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
querydef(x).fields(y).property("Format").value = "#.##0,00"" CHF"";#.##0,00\-"" CHF"""

je me retrouve au final (dans ma requête) avec un format égal à

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

#,000\,00" CHF";#,000\,00"- CHF"

La formule a donc changée entre temps...
C'est peut être lié à des caractères spéciaux?!? Ou une erreur de frappe mais je ne la voie pas!

=> Est ce que l'un d'entre vous à une idée pour expliquer ce problème?

Merci par avance pour votre aide

Lionel

[yonnel]

Bon, je crois que j'ai une piste...
Sur l'ordinateur de test le séparateur de millier est "," et le séparateur décimal est "."
C'est ça qui doit faire que access interprète mal ce que je lui demande...
Je continue à chercher une solution...

[yonnel]

C'est gagné!

Pour ceux que ca intéresse voilà la solution

En fait ce n'est pas la config de l'ordinateur mais l'interpretation faite par VBA;
C'est un peu comme les dates dans les requetes SQL, il faut les mettre au format US.
Hé ben là aussi les formats doivent être entrés au format US.

Donc, au lieu de mettre

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

#.##0,00" CHF";#.##0,00\-" CHF"

il me fallait mettre

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

#,##0.00" CHF";#,##0.00\-" CHF"

Donc un problème résolut tout seul...!