Somme VBA Excel

[ilies_meziani]

Bonjour
Je souhaite faire la somme de ma plage (A4 : jusqu’à la dernière ligne)
J’ai essayé le code suivant

Sub SommeDebit()
    Set Tdebit = Range("A4").End(xlDown)
    Tdebit.Offset(2, 0).FormulaR1C1 = "=SUM(A4:Tdebit)"
End Sub

Mais résultat est #NOM?

Merci

[Mimimathy]

Bonjour,
Mettre cette formule sur la cellule qui donne la somme

=SOMME(A1:DECALER(A15;-1;0))

Ici, A15 est la cellule qui aura la somme

[ilies_meziani]

Merci Mr @Mimimathy

mais comment transforme cette fonction en VBA

Sub SommeDebit()
Set Tdebit = Range(« A4 »).End(xlDown)
Tdebit.Offset(2, 0).Formula = « =SUM(A4: offset(Tdebit.offset(1,0);-1;0)) »
End Sub