Re : Addition cellules decimales dans variable
EUREKA !!!
Votre correction est bonne et moi, j'ai recopié sans refléchir , la boucle:
For i = 6 To 130
If Cells(i, 10) = chantier(K) Then
For J = 1 To 5
If Cells(Y + 1, 1) <> " " Then data(J) = data(J) + Cells(i, J + 3)
Next J
End If...