une formule dans une macro ne fonctionne pas je ne sais pas quel est le problème

Bonjour,

Voilà la formule:

Code:

---

ActiveCell.FormulaArray = "=SUM('Feuil1'!B10,'Feuil1'!C10)+SUMPRODUCT((('Feuil1'!I17:I19729=""RG512"")+('Feuil1'!I17:I19729=""HUGO BOSS"")+('Feuil1'!I17:I19729=""DOLCE GABBANA""))*('Feuil1'!E17:E19729=30))"

---

Merçi de m'éclairer!!

Cdt,
SKIP

Bonjour.

Je n'ai pas regardé la formule de près, mais je vois 2 pb a priori :
- Les formules de zone, s'appliquent à des zones et non pas une cellule isolée, donc "ActiveCell..." me semble douteux
- AVec les formules de zones, il faut, je crois, utiliser la notation L1C1 et non pas A1.

EN espérant que cela t'aide un peu,

PGZ

As tu essayé simplement

Code:

---

ActiveCell.Formula = "=SUM('Feuil1'!B10:C10)+SUMPRODUCT((('Feuil1'!I17:I19729=""RG512"")+('Feuil1'!I17:I19729=""HUGO BOSS"")+('Feuil1'!I17:I19729=""DOLCE GABBANA""))*('Feuil1'!E17:E19729=30))"

---

Qui somme les cellules B10:C10 et le nombre d'occurrences (Ix=RG512, HB ou DG et Ex=30...) pour ne pas faire de publicité

Tu peux aussi saisir la formule via excel dans ta cellule et puis avec l'enregistreur de macro mémoriser la modification de ta cellule que tu ferais par exemple via <F2>. Le code voulu est dans ta macro.

Merçi les amis ça a marché,
J'ai mis

Code:

---

Formula

---

directement à la place de

Code:

---

FormulaArray

---

Merçi infiniment!!!
Cdt,
SKIP