[vba] de FormulaRC à formula

Coucou, c'est encore moi :D

Je voulais passer de formulaRC en formula

Range("F2").Select
ActiveCell.FormulaR1C1 = _
"=IF(RC[-4]<>R[-1]C[-4],SUMIF(R2C2:R5000C2,RC[-4],R2C5:R5000C5),"""")"

EN

ligne = derniereligne("A")
ActiveCell.Formula = "=IF(B2<>B1,SUMIF(H2:H"&ligne&",B2,E2:E"&ligne&"),"""")"

Mais je trouve pas ce qui bloque, j'ai pas de message d'erreur. Juste la ligne qui se met en jaune !

Merci