Lut,
On présume que tu as ouvert ton classeur, ta feuille, sous VB, et que tu as fait tes références donc :
si appExcel est ton classeur et swSheet ta feuille
Dim MyRange as Range, Résultat
Set MyRange = Range("A1:A8")
Résultat = appExcel.WorksheetFunction.Sum(MyRange)
Cordialement, Jean-Paul
______________________________________________________________________
Le Savoir n'a de valeur que s'il est partagé
|