[Résolu] Arrondir avec la fonction Format

Recherche :

Mot : Pseudo : Filtrer
Bas de page
Auteur	Sujet : [Résolu] Arrondir avec la fonction Format

fatloui

I'll be back

Bonjour,

Je fais une macro excel en VBA et j'ai un petit soucis avec la fonction Format()

Je veux que les chiffres soient arrondis à 2 chiffres apres la virgule

99.9999999 -> 100
85.366 -> 85,37
100 -> 100

Pour ce faire, j'ai utilisé le code suivant :

Code :

Dim moy As Variant
moy = Range("U31" ).Value
moy = Format(moy, "0.#,#" )
Selection.Characters.Text = "U31 = " & moy

Donc ca marche super pour
lorsque Range("U31" ).Value=85.366 moy = 85,37

mais lorsque le resultat est un entier, il me laisse la virgule
lorsque Range("U31" ).Value=100 moy = 100,

Comment puis je me debarrasser de cette virgule ?
Merci pour votre aide

Message édité par fatloui le 29-06-2009 à 14:15:23

Publicité

produvba

Bonjour,
Je pense que format(moy, "#.##" ) fonctionnerait mieux

fatloui

I'll be back

merci pour ta reponse.

Je viens d'essayer et ca me donne la meme erreur
U31 = 100,

produvba

Bon, alors ce que tu peux faire, c'est encore autre chose, utiliser la fonction arrondi (qui doit être round en VB mais à vérifier)
essayer:
debug.print arrondi(moy,2)

Là tu dois avoir en automatique quelque chose de limité à 2 chiffres.
Il y a aussi dans Excel arrondi.sup et arrondi.inf si tu veux forcer le sens de l'arrondi.

fatloui

I'll be back

Nikel, ca me donne exactement ce que je veux

moy = Round(moy, 2)

Merci pour ton aide ^^

FORUM HardWare.fr

Programmation

VB/VBA/VBS

[Résolu] Arrondir avec la fonction Format

Sujets relatifs
[RESOLU] Problème étrange avec le Main	[Résolu] execution de jar : Failed to load Main-Class
[résolu]variables de classe; raccourcis syntaxiques	[Résolu]Probleme avec des pointeur de structure
[resolu]Ajax.updater et IE	[RESOLU] Problème exécution .jar
[Resolu] [VBA] Macro Excel - Zone de texte	[Résolu] Chevauchement de mémoire
VBA_Excel_ouverture automatique - Résolu	Problème avec fonction header() + syntaxe.
Plus de sujets relatifs à : [Résolu] Arrondir avec la fonction Format

Page générée en 0.041 secondes