VBA Sum() : macro pour calculer la somme

La fonction Sum permet de réaliser une macro pour calculer une somme de valeurs ou de plages.

La fonction Sum

La fonction Sum suit la syntaxe suivante :

Application.WorksheetFunction.Sum(plage1, plage2, …)

Exemple de macro avec Sum

La macro

Sub Macro()

Dim Tableau1, Tableau2 As Range ‘Variable
Dim Somme As Single

Set Tableau1 = Range(« A1:A5 »)
Set Tableau2 = Range(« B1:B5 »)

Somme = Application.WorksheetFunction.Sum(Tableau1, Tableau2)

ActiveCell.Offset(0, 0).FormulaR1C1 = _
Somme
ActiveCell.Offset(1, 0).Select

End Sub

Les données sources

	A	B	C	D	E
1	6	9
2	2	3
3	5
4	1	1,5
5	5	7,5

Le résultat

	A	B	C	D	E
1	6	9		40
2	2	3
3	5
4	1	1,5
5	5	7,5