Copier une formule avec vba

Bonjour,
Je dois recopier dans une cellule a l'aide d'une macro la formule suivante =SI(ET(ET(J7<>"";B7<>"");J7>=B7);DATEDIF(B7;J7;"d");"") au démarrage du classeur
Le problème ,ce sont les guillemets...la formule ne s'exécute pas ! même en doublant les guillemets .Si vous aviez une solution...je pense que quelque chose m'échappe.Merci de vos réponses

Merci pour vos réponses

Code:

---

cell(1,1).formulaLocal = "SI(ET(ET(J7<>"""";B7<>"""");J7>=B7);DATEDIF(B7;J7;""d"");"""")"

---

ou

Code:

---

cell(1,1).formula = "IF(AND(AND(J7<>"""";B7<>"""");J7>=B7);DATEDIF(B7;J7;""d"");"""")"

---

ça ne fonctionne pas dans mon prog
Je veux copier cette formule au démarrage en k7
j'ai donc
range ("k7").activate
activecell.formula="=IF(AND(AND(J7<>"""";B7<>"""");J7>=B7);DATEDIF(B7;J7;""d"");"""")"
ce qui me donne une erreur definie par l'application ou par l objet
merci

ça marche enfin mais j'ai dû modifier quelque peu
voici la dernière mouture
Cells(7, 11).FormulaLocal = "=SI(ET(ET(J7<>"""";B7<>"""");J7>=B7);DATEDIF(B7;J7;""d"");"""")"
merci

De rien... Tu peux cliquer sur résolu stp?