Erreur d'execution 1004 (formule dans une cellule mise à partir du code)

Bonjour,

J'essaye de mettre la formule "=DATE.COUPON.SUIV(AUJOURDHUI(); " & Feuil10.Cells(i, 13) & "; 4; 2)" dans une cellule de mon classeur mais à l'execution du code ça me renvoie l'erreur: "Erreur d'execution '1004': Erreur définie par l'application ou par l'objet."
J'ai essayé de mettre le string dans une variable avant de l'affecter à la cellule mais ça ne marche toujours pas. Si qun peut m'aider sur ce coup ce sera gentil.
Merci d'avance

le code:

Code:

---

Feuil10.Cells(i, 14).Value = "=DATE.COUPON.SUIV(AUJOURDHUI(); " & Feuil10.Cells(i, 13) & "; 4; 2)"

---

Bonjour,

pour insérer une formule dans une cellule via VBA, utilise

Code:

---

1 2 3

Feuil10.Cells(i, 14).FormulaLocal = "=DATE.COUPON.SUIV(AUJOURDHUI(); " & Feuil10.Cells(i, 13) & "; 4; 2)" ou Feuil10.Cells(i, 14).FormulaR1C1 = "=DATE.COUPON.SUIV(AUJOURDHUI(); " & Feuil10.Cells(i, 13) & "; 4; 2)"

---

Sinon au lieu d'utiliser la formule excel, le code VBA Now peut aussi servir

Exemple :

Code:

---

MsgBox Format(Now, "mm-dd-yyyy")

---

Bonjour,

Code:

---

[D14].FormulaLocal = "=DATE.COUPON.SUIV(AUJOURDHUI();Feuil10!M" & i & ";4;2)"

---

A+

merci les gars, j'ai fait avec FormulaLocal et ça a marché