insérer un formule conditionnelle dans la cellule active

Bonjour,

Je souhaiterais insérer une formule conditionnelle dans la cellule active.

Code:

---

Selection.FormulaR1C1 = "=+IF(RC[-2]-RC[-1]>0.01,""ECART"","""")"

---

Qui correspond dans Excel dans la barre de formule =+SI(J2-K2>0.01;"ECART";"")

Comment faire apparaitre les cellules nommées J2 et K2 dans vba et faire apparaître exactement dans la barre de formule =+SI(J2-K2>0.01;"ECART";"")
Les cellules J2 et K2 contiennent des nombres.

Ci-dessous, mon modèle à corriger :

Code:

---

1 2 3

Sub formule_conditionnelle() ActiveCell.Formula = "=..." End Sub

---

Vous en remerciant par avance.

Cordialement.

Bonjour,
Il y a deux possibilités (sans parler des formules locales)
Soit en style L1C1

Code:

---

ActiveCell.FormulaR1C1 = "=IF(RC[-2]-RC[-1]>0.01,""ECART"","""")"

---

soit

Code:

---

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

Code:

---

? Range("C2").formula

---

ou

Code:

---

? 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.