OVH Cloud OVH Cloud

pourcentage avec 2 décimale en vba

11 réponses
Avatar
denis le breton
Bonjour, me voila de retour, avec un truc tout simple comme d'hab
en VBA je fais le calcul suivant
p101 = nb101 / nbtot * 100
ou nb101 et nbtot sont des entiers
le résultat me donne le pourcentage (oeuf corse),
mais je ne stocke pas cette valeur dans une cellule
ensuite je fais un
msgbox p101
et mon résultat est du style 29,39274...
comment faire pour que l'affichage soit sur 2 décimales par exemple ?
Merci

1 réponse

1 2
Avatar
RGI
hé oui !!!!!!! ça marche O:-)

@+++

RGI

Merci mais hélas j'ai raccourcit l'expression du besoin, en fait j'habille la
variable avec du texte, style :
montexte = " le pourcentage est de " & p101 & "%"
msgbox montexte

et de ce fait le format appliqué au contenu est inopérant, mais surprise en
l'appliquant dans la variable texte cela marche
montexte = "le pourcentager est de : " & Format(p101, "###0.00") & "%" &
vbCrLf
msgbox montexte

Merci de cette réponse



essaie ceci

Sub essai2()
nb101 = 10
nbtot = 2.256
p101 = nb101 / nbtot * 100
MsgBox Format(p101, "###0.00")
End Sub

salutations
RGI


les format s'pplique à des cellules
comment appliquer un format à une variable ?
dans les déclarations ? si oui quelle syntaxe car je ne connais pas
Merci
Denis




Bonjour

tu as regardé du coté de format ?

salutations

RGI



Bonjour, me voila de retour, avec un truc tout simple comme d'hab
en VBA je fais le calcul suivant
p101 = nb101 / nbtot * 100
ou nb101 et nbtot sont des entiers
le résultat me donne le pourcentage (oeuf corse),
mais je ne stocke pas cette valeur dans une cellule
ensuite je fais un
msgbox p101
et mon résultat est du style 29,39274...
comment faire pour que l'affichage soit sur 2 décimales par exemple ?
Merci













1 2