Microsoft 365 [VBA] sum (problème d'arrondi)

terry08200

XLDnaute Nouveau
Bonjour à tous,

Je ne sais pas si mon problème vient de mon code ou de ma configuration mais je commence à douter ...

sur ma feuille 1 il y a des valeurs en O1, O2 jusque O10
mais quand je fais la somme des ces valeurs avec excel donc
Code:
=SOMME(O1:O10)
j'obtiens 8,7
Quand je fais la même chose avec VBA j'obtiens 9,00 :(

Je cherche une solution sur internet, mais quelle est la bonne ? Car après tentative des divers méthode, j'échoue.

Voici ma dernière tentative, sachant que je vais adapter cela à un autre fichier qui à le même problème.

VB:
Sub toto()

Dim toto As Long

toto = Application.Sum(Feuil1.Range("O1:O10").Value)
[P1] = toto

End Sub

Merci par avance.
 

Discussions similaires