Microsoft 365 code renvoie formule dans ma cellule avec des @

[Usine à gaz]

Bonjour à toutes et à tous,
Je vous souhaite un beau dimanche

En voilà une nouvelle pour moi que je n'avais pas encore rencontrée :
en partant de la cellule de ma formule, je l'ai enregistré pour en faire un code.

J'ai adapté ce code pour qu'il soit fonctionnel dans ma macro comme ceci :
ActiveCell.Offset(0, 3).FormulaR1C1 = "=IF(OR(LEFT(ActiveCell.Offset(0, 3) ,3)=336,LEFT(ActiveCell.Offset(0, 3) ,3)=337),""OK"",1)"

Quand le code renvoie le code dans ma cellule il ajoute des @
SI(OU(GAUCHE(@ActiveCell.Offset(0; 3);3)=336;GAUCHE(@ActiveCell.Offset(0; 3);3)=337);"OK";1)

Evidemment, la formule n'est plus fonctionnelle.

Je n'ai pas trouvé ce qui ce passe et c'est la 1ère fois que cela m'arrive.
Auriez-vous la solution ?

Un grand merci
Je continue mes recherches,
lionel

 

[Usine à gaz]

bonjour,
perso je n'es pas le problème!

ActiveCell.Offset(0, 3).FormulaR1C1 = "=IF(OR(LEFT(OFFSET(RC,0,3) ,3)=336,LEFT(OFFSET(RC,0,3) ,3)=337),""OK"",1)"

édite: je n'avais pas vue la réponse de JOB75!

Bjr dysorthographie,
Merci d'être là toi aussi
Je vais tester dès que j'ai un moment et je reviendrai te dire
lionel