Fonction Somme.Si.Ens - Excel/VBA ne fonctionne pas

Fermé

Somme

diimka Messages postés 4 Date d'inscription mercredi 8 avril 2015 Statut Membre Dernière intervention 8 avril 2015 - 8 avril 2015 à 13:27
diimka Messages postés 4 Date d'inscription mercredi 8 avril 2015 Statut Membre Dernière intervention 8 avril 2015 - 8 avril 2015 à 14:46

Bonjour,
Je dois effectuer une addition des montants d'une colonne (G) en fonction de 2 critères.
En effet, je veux une somme de montants uniquement sur les lignes contenant "ens" dans la colonne B ET 1 dans la colonne C.
La seule formule qui me vient à l'esprit est :
=SOMME.SI.ENS(G:G;B:B;"ens";C:C;1)

Le souci, c'est que cette fonction m'additionne les montants de la colonne G si B = "ens" OU C = 1, et non pas ET...

Quelqu'un aurai une solution à mon problème ? Je cherche éventuellement un équivalent en VBA.
Merci.

A voir également:

Vba somme.si.ens
L'indice n'appartient pas à la sélection vba - Forum VB / VBA
Vba range avec variable ✓ - Forum VB / VBA
Erreur 1004 vba ✓ - Forum VB / VBA
Find vba - Astuces et Solutions
Vba ouvrir un fichier excel avec chemin ✓ - Forum VB / VBA

3 réponses

Réponse 1 / 3

f894009 Messages postés 17185 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 15 avril 2024 1 701
Modifié par f894009 le 8/04/2015 à 13:50

Bonjour,

ca marche: https://www.cjoint.com/c/EDin44V29gK

mais vous avez aussi ceci: =SOMMEPROD((G:G)*(B:B="ens")*(C:C=1))

Réponse 2 / 3

diimka Messages postés 4 Date d'inscription mercredi 8 avril 2015 Statut Membre Dernière intervention 8 avril 2015
8 avril 2015 à 14:07

Ah oui, en effet, j'ai fais une petite erreur dans mon classeur...
En tout cas merci.
Existe t'il un équivalent en VBA ? ou je peux simplement passer par .Formula = "= ...... ?

f894009 Messages postés 17185 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 15 avril 2024 1 701
Modifié par f894009 le 8/04/2015 à 14:21

Re,

VBA ex:

ActiveCell.Formula = "=SUMPRODUCT((G:G)*(B:B=""ens"")*(C:C=1))"
'ou
ActiveCell.FormulaLocal = "=SOMMEPROD((G:G)*(B:B=""ens"")*(C:C=1))"

Réponse 3 / 3

diimka Messages postés 4 Date d'inscription mercredi 8 avril 2015 Statut Membre Dernière intervention 8 avril 2015
8 avril 2015 à 14:37

Merci beaucoup pour cette réponse.
Encore une dernière, comment puis-je affecter le résultat du calcul à ma variable SommeENS dans mon code ?

Visiblement
SommeENS = .Formula = "=.... Ne fonctionne pas

Ni

Range("AA1").FormulaLocal = "=SOMME.SI.ENS(G:G;B:B;""ens"";C:C;1)"
Range("AA1").Calculate

Range("AA1").Select
Selection.Value = SommeENS

Comment puis-je faire ?

diimka Messages postés 4 Date d'inscription mercredi 8 avril 2015 Statut Membre Dernière intervention 8 avril 2015
8 avril 2015 à 14:46

C'est bon, j'ai trouvé !

Range("AA1").Select
Range("AA1").FormulaLocal = "=SOMME.SI.ENS(G:G;B:B;""ens"";C:C;1)"

SommeENS1 = Selection.Value

MsgBox SommeENS1 'Me donne la bonne valeur

Merci encore.

Discussions similaires

somme.si.ens en VBA

Problème VBA - Fonction Somme Si Ens

SOMME.SI.ENS VBA

erreur de somme de controle dans winrar

Somme.si.ens 2 critères dont une matrice

affichage de la somme des cellules sélectionnées

Discussions similaires

Newsletters