Formula et condition IF

Bonjour,

J'ai essayé un code dans ma boucle qui a l'air de fonctionner sauf que j'ai un message d'erreur dans la cellule alors que la formule est bien copiée:
(J'utilise Compteur car il est dans une boucle "FOR" que je n'ai pas reprise ici)

Code:

---

1 2 3

Dim Compteur As Integer Compteur = 6 Cells(Compteur, 5).Formula = "=SI(B" & Compteur & "<>"""",DonneesPerso!E4,"""")"

---

j'ai bien dans la cellule E6 ma formule :

Code:

---

=SI(B6<>"""";DonneesPerso!E4;"")

---

mais avec le "#Nom?" comme résultat?
Si j'écris la formule directement dans la cellule, j'ai bien le contenu de la cellule "DonneesPerso!E4" qui est copié!!!

Auriez-vous une idée résoudre cette "bizarerie"???

testes ça:

Code:

---

1 2	Compteur = 6 Cells(Compteur, 5).FormulaLocal = "=SI(B" & Compteur & "<>"""";DonneesPerso!E4;"""")"

---

Bonjour rdurupt,

Merci, ça marche.:lol:

Bonne journée.