Discussion :

[bill_barroud]

Bonjour,

j'ai tenté de chercher sur google sans trouver la terminologie adéquat pour trouver la solution de mon problème...
J'ai déjà eu le cas mais impossible de me souvenir comment j'avais géré ça.

Voici donc de quoi il s'agit.

j'ai une variable de type Single dans laquelle je charge une valeur assemblée (ex : 4 & "," & 79)
Ma variable affiche bien 4,79 (pj n°1) :



Par contre une fois que j'affecte ma valeur dans une case de am feuilel de calcul j'ai tout un tas de décimales sorties d'on ne sais où...




J'ai tenté d'arrondir ma valeur "round(n,2)", de gérer le format "formatnumber(n,2)", sans succés.

Quelqu'un a-t-il une idée sur la question ?

Par avance merci de votre aide.

[Daniel.C]

Bonjour,

C'est une problème qu'on rencontre parfois lié au mode de calcul des ordinateurs. Regarde cette page :

https://support.microsoft.com/kb/125056/fr

Les méthodes suivantes fonctionnent :

Code :

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

Sys_solaire = Round(Sys_solaire, 2)

ou :

Code :

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

1
2
    Range("E1").Value = Sys_solaire
    Range("E1").NumberFormat = "0.00"

[bill_barroud]

Merci pour votre réponse.

Je n'arrive pas à charger la page de MS...

J'ai déjà testé ces options.
Comme indiqué dans ma question j'ai testé la fonction "round(n,2)" (ainsi que la fonction "formatnumber(n,2)") sans succès.
De toute façon ces deux fonctions ont pour but d'arrondir la variable or elle l'est déjà.

Comme on le voit dans ma pj la valeur de la variable est bien 4,79.

L'autre option proposée concerne le format visuel d'excel, on verra bien 4,79 mais le contenu de la cellule sera toujours le même : 4,78999...etc...

Et je sèche toujours :/

[bill_barroud]

J'ai retrouvé le message que j'avais fait à l'époque (j'avais perdu mon id...)

Le voici : http://www.developpez.net/forums/d10...string-single/

Fort de cette découverte j'ai stocké ma variable en "string" puis j'ai convertit ma cellule avec la méthode indiqué de "cellule au format texte" en "cellule de nombre".
Nickel.

Mais non, ça ne fonctionnait pas avec les chiffres ayant 3 décimales...
Il m'affichait 4103 au lieu de 4,103.

J'ai donc compris mon problème.

Une question de format système...

Mon excel est paramètré pour utiliser la virgule "," comme séparateur entier/décimal alors que mon système utilise le point "."...

Le code à utiliser était donc :

Code :

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

sys_Solaire = Mid(pos, 2, 1) & "." & Mid(pos, 4, 1)

tout fonctionne maintenant.

Merci d'avoir pris le temps de me lire, d'y réfléchir et de me répondre.

[vinc_bilb]

Bravo mais .... cependant, ce n'est pas très propre de mon point de vue et risqué....

1 Attention à vos déclarations de variables et aux conversions implicites faites par VBA

vous déclarerz Sys_Solaire comme un single mais vous le traitez ensuite comme un string et c'est VBA qui se débrouille ....
sys_Solaire = Mid(pos, 2, 1) & "." & Mid(pos, 4, 1)

2. Vous pouvez aussi utiliser la fonction split ou like pour optimiser votre code

Bonne journée

[Daniel.C]

@ bill_barroud

J'ai déjà testé ces options.

Sûr ?

Les deux fonctionnent; et si "NumberFormat" ne fait qu'afficher le format sans changer la valeur, si tu avais imposé un format "Nombre" sur la colonne, tu ne te serais pas aperçu de l'écart, ni à l'affichage ni ,très probablement, avec les éventuels calculs postérieurs.

[bill_barroud]

Bravo mais .... cependant, ce n'est pas très propre de mon point de vue et risqué....

1 Attention à vos déclarations de variables et aux conversions implicites faites par VBA

vous déclarerz Sys_Solaire comme un single mais vous le traitez ensuite comme un string et c'est VBA qui se débrouille ....
sys_Solaire = Mid(pos, 2, 1) & "." & Mid(pos, 4, 1)

2. Vous pouvez aussi utiliser la fonction split ou like pour optimiser votre code

Bonne journée

Je ne connaissais pas "split" et "like" et je ne suis pas certains d'arriver à en appréhender toute les subtilités.

Pour revenir à vos remarques, je pense en effet qu'initialement mon erreur était là également : en entrant une valeur formatée comme on formate une chaine de caractère (mid & "" & mid) dans une variable de type Single.

Ce que je n'ai pas précisé lors de mon post de cloture c'est que j'ai aussi changé de type variable, je la déclare en "string" et plus en "single".