Somme avec Boucle for Next
Bonjour à tous,
J'ai besoin de votre aide svp :
J'ai une tableau avec le nombre de produit vendu étalé sur l'année, je veux calculer la somme de chaque produit par mois, le calcul se fait horizontalement c'est pour ça que j'utilise Cells et nom pas Range comme vous le voyez, sauf que cette methode me calcule seulement les deux deux cellules et non pas tout ce qu'il y a entre elles.
x : le nombre de colonnes
j : la colonne à calculer
drlg : la dernière ligne renseignée
For j = 2 To x
ThisWorkbook.Sheets(1).Cells(3, j) = Application.WorksheetFunction.Sum(Cells(4, j), Cells(drlg, j))
Next
Merci à tous de votre aide
Bonsoir,
Essayez :
ThisWorkbook.Sheets(1).Cells(3, j) = Application.WorksheetFunction.Sum(range(Cells(4, j), Cells(drlg, j))).
Sans le range, la somme ne se fait que sur les deux cellules Cells(4, j) et Cells(drlg, j).
En formule Excel, c'est la différence entre SOMME(A1;A5) (sans le range) et SOMME(A1:A5) (avec le range).
Bonsoir MaPoire,
Merci beaucoup pour votre aide, ça marche parfaitement, je ne savais pas qu'on pouvait combiner Range et cells.
Encore une fois merci.