Bonjour,
Ta macro :
Sub test()
With Range("C11")
.FormulaR1C1 = "=SUM(R[-2]C:R[-1]C)"
.Interior.Color = vbGreen
End With
End Sub
Remarque : apprendre à écrire une macro sans se référer aux défauts de l'enregistreur...
NB- Si utiliser VBA pour mettre formule... pas très optimal !
Au temps pour moi ! Tu voulais colorer une autre cellule :
Sub test()
Range("C11").FormulaR1C1 = "=SUM(R[-2]C:R[-1]C)"
Range("F5").Interior.Color = vbGreen
End Sub
NB (complément)- Ce n'est pas parce que l'enregistreur a coutume d'insérer des formules par la propriété FormulaR1C1 que les propriétés Formula, FormulaLocal ou FormulaLocalR1C1 offriraient moins d'intérêt...