Bonsoir,

Je suis sur le sujet depuis très longtemps mais après avoir cherché sur internet je n'ai pas trouvé..

je cherche à réaliser une somme mais avec la fonction arrondi....

voici mon code :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
Dim lign As Long
Dim ligne As Long
 
ligne = Range("J" & Rows.Count).End(xlUp).Row
lign = Range("G1").End(xlDown).Row + 1
 
'Cells(ligne + 1, 2) = Application.Sum(lign & ligne)
Cells(ligne + 1, 2) = Application.Sum(Range(Cells(lign, 2), Cells(ligne, 2)))
Pouvez vous m'aider sur le sujet svp ?