Bonjour Gras, le Forum
Perso, je n'aime pas utiliser FormulaR1C1, je préfère Formula.
Mais voici pour la syntax :
Sub TheFormulaSumming()
Dim a As Byte, b As Byte
a = 10
b = 20
ActiveCell.Formula = "=SUM(A" & a & ":A" & b & ")"
ActiveCell.Offset(1, 0).FormulaR1C1 = "=sum(r[" & -a & "]c[-2]:rc[-2])"
End Sub
Bonne Journée
@+Thierry