Ecrire la formule somme dans une cellule

[Troudz]

Bonjour,

Malgré les nombreuses sources trouvées sur le net, je n'ai pas réussi à trouver une solution adaptée à mon cas.
A la suite de nombreux retraitements sur des plages de cellules, j'obtiens une plage variable définie par :

Range(Cells(2, 6), Cells(NLigne, 6))

où NLigne désigne le numéro de la dernière ligne bien évidemment.
Mon but est d'écrire, la formule SOMME dans la cellule juste en dessous de ma plage afin d'avoir une addition dynamique de tous les éléments de ma plage . Je ne veux pas écrire le résultat mais bel et bien la formule.

Auriez vous une idée ?

Je vous remercie par avance de votre aide

 

[Paf]

Re : Ecrire la formule somme dans une cellule

Bonjour,

Pas trouvé plus simple:

MaFormule = "=sum(" & Cells(2, 6).Address & ":" & Cells(NLigne, 6).Address & ")"
Cells(NLigne + 1, 6).Formula = MaFormule

Bonne suite

 

[Troudz]

Re : Ecrire la formule somme dans une cellule

Bonjour et merci Paf,

Je n'avais effectivement pas pensé à me servir de la méthode .Address.

Malheureusement, cela me renvoi une erreur 1004 : Erreur définie par l'application ou par l'objet....

 

[Paf]

Re : Ecrire la formule somme dans une cellule

Re
chez moi ça fonctionne; il faudrait savoir le contexte du code et où se situe l'erreur
A+

 

[Troudz]

Re : Ecrire la formule somme dans une cellule

Arf ben maintenant ça marche...... Je comprends pas. Ça m'affichait #Nom comme erreur....

Merci beaucoup pour ton aide et bonne fin de journée