Bonjour à tous !
J'aimerais modifier le contenu d'une formule de calcul d'une cellule Excel. J'ai rédigé ce code là :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
Sub nouv()
Dim adr As String
adr = "A$15$"
chaine_non_modif = ActiveCell.FormulaLocal
  chaine_modif = chaine_non_modif & "+" & adr
  ActiveCell.Clear
    ActiveCell.Formula = chaine_modif
End Sub
Mais ca marche pas
Quelqu'un pourrait-il me souffler d'où proviens l'erreur ?
Merci