OVH Cloud OVH Cloud

Somme avec VBA

1 réponse
Avatar
Michel
Bonjour,

Dans la colonne A j'ai des nombres et dans la colonne B j'ai également des
nombres, alors voilà, dans la colonne C j'aimerais pouvoir mettre la somme
des nombres figurant dans la colonne B par rapport au nombre de la colonne A.
Exemple : de A1 à A4 j'ai 444, de A5 à A13 j'ai 449, etc... et je voudrais
que dans C1 j'aie la somme de B1 à B4, que dans C5 j'aie la somme de B5 à
B13, etc...

Merci de votre aide

1 réponse

Avatar
AV
Sub zzz()
x = 1
For i = 1 To [A65536].End(3)
If Cells(i, 1) <> Cells(i + 1, 1) Then
Cells(x, 3) = Application.Sum(Range(Cells(x, 2), Cells(i, 2)))
x = x + i
End If
Next
End Sub

AV