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
Pourriez vous m'aider car mon niveau en VBA n'est pas très élevé.
Merci d'avance
Code:
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 + ")"