Correction de formule en VBA

Bonsoir,

Je butte depuis quelques jours sur cette formule, =SI(NB.SI(Feries;$A2)>0;"";$A2-1) qui me renvoie sous excel le bon résultat parcontre dès que je passe en vba j'ai une erreur mais je ne vois pas laquelle

With Cells(1 + Z, 1)
ActiveCell.FormulaR1C1 = "=SI(NB.SI(Feries;$A2)>0;"""";$A2-1)"
End With
 Next Z

J'ai du oublier un guillemet ou un espace ou un truc m'échappe.....je m'en arrache les cheveux,

alors Si vous avez une petite idée mon coiffeur aura une pensée pour vous,

Salut edlede,

ce ne serait pas 'FormulaR1C1' qui cloche? Le référencement des cellules ne correspond pas!

Avec 'Formula' ou 'FormulaLocal', ça devrait passer, me semble-t-il...

A+

Bon finalement en utilisant l enregistreur de macro j'ai obtenu ceci qui fonctionne nickel

ActiveCell.FormulaR1C1 = "=IF(COUNTIF(Feries,RC1)>0,"""",RC1-1)"

merci curulis57 mais J ai essayé aussi mais j'ai pas eu le résultat escompté j'ai du louper un truc mais la solution me convient