Insertion de la fonction somme ?

Bonjour,

Bonjour,
Comment insérer dans VBA pour excel la fonction somme ?, telle qu'elle existe au menu, sans spécifier de champ, afin qu'elle prenne d'office les cellules à additionner au-dessus (comme elle le fait automatiquement). C'est pour mettre dans un tableau extrait d'un réseau, dont le nombre de ligne est variable.
En enregistrant ma macro, elle conserve le nombre de ligne du tableau sur lequel j'ai enregistré la macro, et donc ne marche pas avec des tableaux ayant un nombre de ligne différent

Voici la ligne qui ne fonctionne pas :
ActiveCell.FormulaR1C1 = "=SUM(R[-7]C:R[-1]C)"

Merci de votre aide