Discussion :

[alex.a]

Bonjour,

J'ai un ptit souci avec les décimaux lorsque je fais une somme d'une plage de cellule.

Alors que mon résultat est 1806.27
le code m'affiche 1806.00

Et je comprends pas pourquoi.

Avez vous une idée sur la cause du problème?
merci d'avance

Cordialement
alex.a

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
Dim Lasomme As Integer
    Dim maplage As Range
    Set maplage = Range("G8:G" & j)
    Lasomme = Application.WorksheetFunction.Sum(maplage)
    Range("G2").Value = Lasomme

[ouskel'n'or]

Regarde à Integer, dans l'aide et vois si tu ne peux rien changer

Dim Lasomme As Integer

[alex.a]

C'est bon j'ai trouvé finalement c'était pas bien compliqué
Il fallait définir lasomme comme un Variant et non comme un Integer

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Lasomme As Variant

j'ai eu la révélation en relisant mon post


Merci ouskel'n'or t'as été plus rapide que moi pour poster