Bonjour,
Il y a deux possibilités (sans parler des formules locales)
Soit en style L1C1
ActiveCell.FormulaR1C1 = "=IF(RC[-2]-RC[-1]>0.01,""ECART"","""")"
soit
ActiveCell.Formula = "=IF(J2-K2>0.01,""ECART"","""")"
Si tu hésites pour la syntaxe d'une formule, tu écris ta formule par exemple en cellule C2
Tu vas dans la fenêtre Exécution de ton éditeur (que l'on active par Ctrl+G) et tu tapes l'instruction suivante
ou
? Range("C2").FormulaR1C1
Tu vas voir s'afficher la formule dans le style choisi.
Il te suffit ensuite de faire un Copier/Coller dans ton code en doublant les guillemets des constantes alphanumériques s'il y en a dans la formule.
Partager