Somme avec test

[Gautier]

Bonjour,

Vous trouverez un exemple dans le fichier joint.
Je vous sollicite pour le prob suivant:
j'aimerais pourvoir copier une formule (cellules jaunes), sans avoir à la modifier (le vrai fichier compte des millers de lignes) qui permet de faire la somme des quantités / tailles, sachant que le nombre de tailles par ref varie.
Il s'agirait en qqles sortes d'une somme effectuant un test qui determine le nombre de ligne à sommer.
J'imagine que c'est assez simple, mais mes qqles notions de VBA de ne me suffisent pas...
Merci de votre aide !
cdlt,
Gautier

 

[ziopizza]

Re : Somme avec test

Bonjour Gautier,

Fichier Ou ?.
Voir Pièces jointes sur Excel Downloads .
Yves
https://www.excel-downloads.com/forums/forum-excel.7/

 

[Darnel]

Re : Somme avec test

Salut

Si ta demande de calcul ne porte que sur des chiffres d'une seule et même colonne, tu peux déterminer comme plage à sommer : (A1;A65356)
sachant que tu additionne toute la colonne
si ca ne commence qu'en A2, dans ce cas 🙁A2:A65356)

Sinon, un fichier joint serait utile comme le dis ziopizza

 

[Gautier]

Re : Somme avec test

Merci pour vos réponses: ci joint le fichier !!!
Merci d'avance,
cdlt,
Gautier

 

[Jocelyn]

Re : Somme avec test

Bonjour le Forum,
Bonjour Gautier, Darnel, ziopizza,

alors plusieurs solution pour une somme conditionnelle

a mettre en G12 :

=SOMME.SI(C8:C17;"ref1";E8:E17)

ou

=SOMMEPROD((C8:C17="ref1")*E8:E17)

la grande différence entre les 2 formule somme.si n'accepte qu'un seul critere alors qu'avec Sommeprod tu peux mettre jusqu'a 30 critere de condition.

Jocelyn

edit correction erreur de frappe

 

[Darnel]

Re : Somme avec test

salut Jocelyn

encore une fois tu es le plus rapide

va falloir que je progresse encore.
je met quand m^me ma réponse

=SOMME.SI(C8:C17;"ref1";E8:E17) a mettre en G12 et
=SOMME.SI(C8:C17;"ref2";E8:E17) en G18


Mais bon jocelyn a répondu
PS: Jocelyn peux tu m'expliquer ce que ca fait de mettre :
=somme.si(=SOMME.SI(C8:C17;"ref1";E8:E17)

Ca ressemble à une faute de frappe (il manque un parenthèse) mais j'en suis pas sur


merci et A+

 

[Jocelyn]

Re : Somme avec test

re darnel,

cela n'apporte rien et je ne suis même pas sur que ca fonctionne c'est juste une erreur de frappe la bonne ecriture est la tienne😡

Jocelyn🙂

 

[Darnel]

Re : Somme avec test

Re

Ouais!!!!

Ne m'en veux pas mais pour une fois j'ai trouvé une erreur ( quoique j'était quand même pas sur de moi) chez un maître xldien.

Bonne journée (j'ai intérêt à bien me tenir sinon je vais me faire allumer ...)

A+

 

[Gorfael]

Re : Somme avec test

Merci pour vos réponses: ci joint le fichier !!!
Merci d'avance,
cdlt,
Gautier

Salut
Une possibilité de macro :

Sub Macro1()
Dim Tab_Val() As Variant
Dim Lg_Cours As Long
Dim X As Integer
Dim Y As Integer

Sheets("feuil1").Activate
For Lg_Cours = 8 To Range("E65536").End(xlUp).Row
    If (Cells(Lg_Cours, 3) <> Cells(Lg_Cours - 1, 3)) And Not (IsEmpty(Cells(Lg_Cours, 3))) Then
        X = X + 1
        ReDim Preserve Tab_Val(2, X)
        Tab_Val(1, X) = Cells(Lg_Cours, 3)
    End If
    Tab_Val(2, X) = Tab_Val(2, X) + Cells(Lg_Cours, 5)
Next Lg_Cours
With Sheets("feuil2")
    For Y = 1 To X
        .Cells(Y, 1) = Tab_Val(1, Y)
        .Cells(Y, 2) = Tab_Val(2, Y)
    Next Y
End With
End Sub

A+

 

[Gautier]

Re : Somme avec test

OK merci à tous pour vos réponses, j'ai régler mon problème !
Bonne journée !
Cdlt,
Gautier