Bonjour,

Je suis nouvelle sur Visual basic et j'ai un petit probleme:

J'ai fait un programme qui doit faire la somme des nombres dans un tableau excel. Ca marche sauf que c'est des nombres décimaux et ca me fais des nombres entiers.

Ex: Au lieu de m'afficher 485,96 ca m'affiche 486

Voici mon programme:
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
For i = 2 To 10000
 
 
        cellule$ = "L" & Format(i)
        Contenu$ = ActiveSheet.Range(cellule$).Value
 
          If Contenu$ = client$ Then
              cellule = "I" & Format(i)
              somme = CDec(somme) + CDec(ActiveSheet.Range(cellule$).Value)
          End If
 
     Next i
Quelqu'un peut m'aider?
Merci beaucoup