Discussion :

[Maiden002]

Bonjour le forum.

J'ai un petit souci que je n'arrive pas a mi résoudre

Je cherche a faire la somme d'une colonne suivant un critére.

Je dois faire la somme de la colonne F (F11:F250) mais que des cellules ou a la Colonne B(B11:B250) il y a présent TOTO.

Exemple :

TOTO ==> 25
TOTO ==> 25
TATA ==> 25

Mon résultat devrai etre 50 et non 75..

j'ai commencer avec un For Each, mais je n'arrive plus a avancé, je suis coincé..

Je sais pas si j'ai été assez clair, demandez moi des infos si vous voulez.
Si quelqu'un s'aurait résoudre mon probléme.

Merci beaucoup

[rvtoulon]

Slt
Je viens de lire ton post, pourquoi ne pas essayer ceci:
en admettant que tu veuilles le résultat dans la cellule A1, donc dans la cellule A1 tu entre ceci:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

=SOMME.SI(B11:B250;"TOTO";F11:F250)

A+

[Maiden002]

Arf désolé, je l'avais précisé dans le titre mais pas dans le message.

Il s'agit de le faire en VBA.

Car en faite "TOTO" est un exemple que j'ai pris comme base.

Mais sinon il est possible qu'il y est d'autre critére.
Car j'ai fais une liste déroulante, ou par exemple dedans il y a TOTO , TATA, etc. Suivant le choix de l'utilisateur, il me fais la Somme de la colonne F où dans la colonne B il y a le choix de l'utilisateur.

ma liste déroulante est une UserForm (le nom de ma liste déroulante est cmbvaleur)

Merci

[Patnel]

en fait ton pb est facile

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
if cells(a, b).value = "TOTO" then
 
sommez = cells(a,c) + sommez
endif

[Maiden002]

Je comprends pas vraiment ce que tu viens de me donner.

dans ton code tu fais sur une seul cellule, or moins je cherche pour une plage

[oOVaveOo]

Bonjour,

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
somme = 0
 
For i = 11 to 250
	if cells(i, 2) = "toto" then
		somme=somme+cells(i,6).value
	end if
next i

Ca devrait marcher

@+

[rvtoulon]

slt, ok
si tu nomme ta plage B11:B250 en "noms" par exemple, et F11:F250 en "valeur" alors tu peux essayer ceci:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
Sub sommesi()
 
With ActiveSheet
.Range("A1").FormulaR1C1 = "=SUMIF(noms, ""=TOTO"", valeur)"
.Range("A2").FormulaR1C1 = "=SUMIF(noms, ""=TATA"", valeur)"
End With
 
End Sub

A adapter
A+