Affichage et valeur d'un nombre

Résolu
kardiss Messages postés 17 Date d'inscription mardi 17 février 2009 Statut Membre Dernière intervention 9 juillet 2009 - 8 juil. 2009 à 11:24
kardiss Messages postés 17 Date d'inscription mardi 17 février 2009 Statut Membre Dernière intervention 9 juillet 2009 - 9 juil. 2009 à 10:15
Bonjour,

Je fais des calculs dans une userform et je voudrais qu'un résultat qui se trouve dans un label n'affiche que 2 chiffres après la virgule mais tout en gardant la valeur entière du nombre pour l'utiliser dans un autre calcul.

Je ne connaît que la fonction format mais elle ne garde pas la valeur entière du nombre, avez-vous une autre solution ?

label = base

base = (Val(salaire) / 151.67)
base = Format(base, "#00.00")    ??????

Merci

10 réponses

kardiss Messages postés 17 Date d'inscription mardi 17 février 2009 Statut Membre Dernière intervention 9 juillet 2009
9 juil. 2009 à 10:15
ça y est j'ai compris  :

...sub..
base1 = (Val(salaire) / 151.67)   ' variable
base2 = Format(base1, "#00.00")   ' variable
base = base2   ' label
end sub

...sub...
base1 = (Val(salaire) / 151.67)
SMB = ...    ' calcul avec base1 (valeur entière)
end sub
3
jmf0 Messages postés 1566 Date d'inscription mardi 26 décembre 2000 Statut Membre Dernière intervention 5 avril 2013 8
8 juil. 2009 à 11:55
Bonjour,

On ne connait ni le type, ni la forme (séparateur décimal) de salaire ...
Et la précision est ici indispensable (comme toujours) !
0
kardiss Messages postés 17 Date d'inscription mardi 17 février 2009 Statut Membre Dernière intervention 9 juillet 2009
8 juil. 2009 à 12:25
 salaire = textbox, donnée récupérée d'une cellule excel (exemple : 1865.23)
0
jmf0 Messages postés 1566 Date d'inscription mardi 26 décembre 2000 Statut Membre Dernière intervention 5 avril 2013 8
8 juil. 2009 à 13:05
Et on attend toujours la forme (séparateur décimal présent) !!!!
Tel qu'il est récupéré dans ta textbox ...
Ou tu apprends à répondre avec précision, ou tu continues, mais seul ...
0

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question
kardiss Messages postés 17 Date d'inscription mardi 17 février 2009 Statut Membre Dernière intervention 9 juillet 2009
8 juil. 2009 à 14:00
c'est marqué dans l'exemple : un point
0
jmf0 Messages postés 1566 Date d'inscription mardi 26 décembre 2000 Statut Membre Dernière intervention 5 avril 2013 8
8 juil. 2009 à 15:39
Dans ton exemple, tu parles de la valeur contenue dans une cellule, pas celle de la textbox (ah, la précision !), qui pourrait être, elle, utiliser une virgule ...

Bon ! puisque c'est un point, voilà (type en double)  :

Dim salaire As Double, base As Double
salaire = Val("1865.21")
base = (salaire / 151.67)
MsgBox base
base = Format(base, "#00.00")
MsgBox base
0
kardiss Messages postés 17 Date d'inscription mardi 17 février 2009 Statut Membre Dernière intervention 9 juillet 2009
8 juil. 2009 à 16:41
voilà ce que ça donne :

msgbox : 0
label "base" : vide

A quoi sert msgbox ici ?
0
jmf0 Messages postés 1566 Date d'inscription mardi 26 décembre 2000 Statut Membre Dernière intervention 5 avril 2013 8
8 juil. 2009 à 18:38
A voir que ce n'est pas la fonction Format qui déraille.

Le reste est évident et très rudimentaire...
Dans mon exemple, je n'ai pas utilisé de label et base est une variable (c'est visible, non ?)...
Reprends tes bases à zéro (tu parais en avoir diablement besoin)...
Bonne chance.
0
kardiss Messages postés 17 Date d'inscription mardi 17 février 2009 Statut Membre Dernière intervention 9 juillet 2009
9 juil. 2009 à 09:20
Bon je n'ai toujours pas de réponse à ma première question : est-ce que vous pouvez me confirmer que le fonction Format arrondi le nombre et donc ne garde pas sa valeur entière ?
et est-ce qu'il existe un autre moyen d'appliquer un format à un nombre (dans un label) tout en gardant sa valeur entière ?

SVP,merci
0
kardiss Messages postés 17 Date d'inscription mardi 17 février 2009 Statut Membre Dernière intervention 9 juillet 2009
9 juil. 2009 à 09:29
Avec ce que vous m'avez donner précédemment cela confirme que la fonction Format arrondi.

Mais est-ce qu'il existe autre chose?
0
Rejoignez-nous