Formule Excel + Range dans une macro VBA

Bonjour,

Je tente d´insérer une formule dans une cellule Excel via une macro, mais le résultat obtenu quand je lance ma macro est nul, alors qu´il ne devrait pas l´etre...

Voici le code :


Public r As Integer
Public c As Integer

Sub calculer_la_pente()

Range("A5").End(xlDown).Select

c = ActiveCell.Column
r = ActiveCell.Row


Range("N14").FormulaLocal = "=Steigung(" & Cells(5, 6).Address & ":" & Cells(r - 1, 6).Address & ";" & Cells(5, 1).Address & ":" & Cells(r - 1, 1).Address & ")"

End Sub


"Steigung" est le nom de la fonction Excel en allemand car je travaille en allemagne. Elle marche très bien si je l´utilise seule dans une case.

Pourriez-vous m´aider à trouver le problème svp ??

Merci beaucoup !!