VBA affichage nombre décimal (2chiffres après la virgule)

Bonjour à tous,

Nouveau en VBA, je commence par de petits programmes simples.

J'ai actuellement un fichier excel avec des formules et je cherche a afficher dans un msgbox la somme de plusieurs données qui sont chacune le résultat d'un calcul. Ces données sont donc arrondies à 2 chiffres après la virgule (via format de cellule) mais comportent en réalité beaucoup de chiffres après la virgule. Du coup, la somme qui s'affiche dans mon msgbox est correcte mais j'aimerais limiter à 2 le nombre de chiffres après la virgule mais je n'y arrive pas. Pouvez vous m'indiquer comment faire?

J'ai essayé de déclarer les variables en double, single et currency. Avec le currency, j'ai 4 ciffres après la virgule tandis qu'avec les autres j'en ai ?????? bcp

Merci pour vos réponses

Tu peux utiliser Round ... mais cela ne fonctionne pas pour autant.

Donc voici une petite fonction

Private Function Arrondi(ByVal Nombre, ByVal Decimales)
    ' remplace round() qui ne donne pas de bon resultat
    Arrondi = Int(Nombre * 10 ^ Decimales + 1 / 2) / 10 ^ Decimales
End Function

Bonjour,

Pour modifier simplement l'affichage dans la MsgBox, tu peux utiliser la fonction Format :

MsgBox "Somme : " & Format(MaValeur, "0.00")

A+

Edit : doublon, mea culpa, à supprimer …

Merci pour vos réponses rapides....................et efficaces! ca marche nikel et en plus c'est déclinable à l'infini

tres bon week-end!

Rechercher des sujets similaires à "vba affichage nombre decimal 2chiffres virgule"