Pb avec sum if

Bonsoir à tous,
J'ai un souci avec la fonction sum if, et j'ai regardé sur le forum mais je n'ai pas trouvé la réponse à ma question.
Voici la fonction

Code:

---

1 2 3 4 5 6 7 8 9 10

sub macro()   l = Sheets("feuille2").Cells.SpecialCells(xlCellTypeLastCell).Column m = Worksheets("feuille2").Cells(Cells.Rows.Count, "B").End(xlUp).Row   For i = 6 To m Worksheets("feuille1").Cells(i, 9) = "=SUMIF('feuille2'!" & Range(Cells(6, 13), Cells(k, l)) & ",'feuille1'!" & Cells(i, 2) & ",'feuille2'!" & Range(Cells(6, l), Cells(k, l)) & "" next   End sub

---

Merci et bonne soirée

Bonjour

Pour affecter à une cellule il faut utiliser la propriété Formula ou FormulaLocal suivant le cas.

Un petit coup sur la touche :f1: et une recherche sur le forum te donnera les informations nécessaires.

Starec

Oui c'est ce que j'avais fait au début mais j'avais quand même une erreur d'execution c'est pour çà que je ne comprends pas...

Si tu utilises Formula => formule en anglais
Si tu utilises FormulaLocal => Formule en français

Sinon, tu as aussi l'option FormulaR1C1 pour un adressage relatif.

Si après ça tu as encore une erreur, c'est ta formule qu'il faudra revoir.

Bonjour,
J'ai fait quelques essais et constaté..
Ajouter Adress, sinon c'est la valeur de la cellule qui est prise en compte
et quand c'est la valeur de la cellule qu'il faut, en string ce n'est pas supporté

Code:

---

1 2 3

Range(Cells(6, 13), Cells(8, 20)).Address 'et Val(Range(Cells(6, 13), Cells(8, 20)).text)

---

Le SUMIF n'a pas fonctionné mais avec

Code:

---

1 2 3

sheets("Feuil1").select cells(X,Y).select ActiveCell.FormulaLocal = "=SOMME.SI(

---

Sur l'aide, ca fonctionne mais je n'ai pas réussi a adapter le critère avec autre chose qu'une comparaison chiffrée.

Code:

---

1 2	Cells(5, 12).Select ActiveCell.FormulaLocal = "=SOMME.SI(A1:A4;"">160"";B1:B4)"

---

Je crois quil faudra soit passer par une macro, soit décomposer la fonction
a moins que d'autres aient une solution.

A+
EDIT:
Ca ne m'étonne pas que je ne suis pas parvenu à définir le critère....

Citation:

---

critère représente le critère, exprimé sous forme de nombre, d'expression ou de texte, qui détermine les cellules à compter. Par exemple, l'argument critère peut être exprimé sous une des formes suivantes : 32, « 32 », « >32 » ou « pommes ».

---

Ok merci,
en faisant cette commande çà marche:

Code:

---

Worksheets("feuille1").Cells(i, 9).Formula="=Worksheets("feuille1").Cells(i, 9)+ SUMIF('feuille2'!" & Range(Cells(6, 13), Cells(k, l)).Address & ",'feuille1'!" & Cells(i, 2).Address & ",'feuille2'!" & Range(Cells(6, l), Cells(k, l)).Address & ")"

---

Merci beaucoup de votre aide