Macro: utiliser les adresses de cellule pour faire une somme

[ginger59]

Voilà ça fait un petit moment que je me bas avec une ligne de code sans comprendre pourquoi elle ne fonctionne pas.
Pourriez vous m'aider car mon niveau en VBA n'est pas très élevé.
Merci d'avance

Dim Tprod As Variant
Tprod = ActiveCell.Address
...
Dim Tconso As Variant
Tconso= ActiveCell.Address (différent de Tprod, j'ai racourcie le code)
...
ActiveCell.Offset(0, 1).Select
ActiveCell.FormulaR1C1 = "=sum(" + Tprod + ";" + Tconso + ")"

 

[Pierrot93]

Re : Macro: utiliser les adresses de cellule pour faire une somme

Bonjour ginger

essaye peut être comme ceci :

ActiveCell.FormulaLocal = "=SOMME(" & Tprod & ";" & Tconso & ")"

bonne soirée
@+

 

[ginger59]

Re : Macro: utiliser les adresses de cellule pour faire une somme

Malheureusement ça ne fonctionne pas non plus.

"Erreur d'application 1004"