Ecrire une formule dans une cellule en VBA

Bonjour,

Après avoir parcouru le forum et utilisé F1, je me décide à poster pour "mon" problème:

Je souhaite modifier la formule d'une cellule
formule initiale

Code:

---

=SOMME.SI($A2:$A430;"D";AC2:AC430)

---

afin qu'elle reflète le "bon" nb de lignes au lieu de "430"

Je fais donc

Code:

---

1 2	formule = "=SOMME.SI($A2:$A" & nblignes & ";""D"";AC2:AC" & nblignes & ")" Worksheets(1).Cells(nblignes, 29).Formula = formule

---

et j'ai l'erreur 1004 Erreur définie par l'application ou par l'objet

Pourtant, en pas à pas, la variable formule parait bien formée, conformément à la formule initiale

Qu'est-ce qui cloche ?

Merci.

Bonjour qi130,

essaye de remplacer "Formula" par "FormulaLocal"

ou alors il faut traduire les noms de fonctions en anglais et remplacer les ";" par des "," dans la formule

bonjour

est ce que ta variable formule est bien declarée dans le bon type en debut de macro? dans ton cas "dim formule as variant"



au plaisir

La variable formule est déclarée en string

Regarde ce qu'on te propose, totti

Code:

---

1 2	formule = "=SOMME.SI($A2:$A" & nblignes & ";""D"";AC2:AC" & nblignes & ")" Worksheets(1).Cells(nblignes, 29).Formulalocal = formule

---

Ou bien

Code:

---

1 2	formule = "=sumif($A2:$A" & nblignes & ",""D"",AC2:AC" & nblignes & ")" Worksheets(1).Cells(nblignes, 29).Formula = formule

---

Ca marche avec Formulalocal :ccool:

:merci: à tous

Bonjour à tous,

ça fait plaisir de voir qu'on est lu quand on propose une solution ;)