Tri et total selon critère

Bonjour!

Sur l'exemple en pièce jointe je sollicite votre aide pour un tri selon la colonne Lot et un total des quantités à la fin de chaque lot.

Merci

bonjour,

as-tu essayé un tableau croisé dynamique ?

sinon voici une solution via une macro

Sub aargh()
    i = 2
    s = 0
    o = Cells(i, 1)
    While Cells(i, 1) <> ""
        If Cells(i, 1) = o Then
            s = s + Cells(i, 2)
        Else
            o = Cells(i, 1)
            Rows(i).Insert shift:=xlDown
            Cells(i, 2) = s
            Range(Cells(i, 1), Cells(i, 2)).Interior.Color = vbYellow
            s = 0
        End If
        i = i + 1
    Wend
End Sub

Bonjour!

Merci à vous h2so4, oui j'ai bien sure fais le travail avec un TCD, mais comme le rendu est pour d'autre utilisateur, j'ai préféré m'adresser au forum pour une solution VBA.

Je vais essayer de l'adapter et je reviens vers vous.

Merci.

Bonjour H2so4!

Dans votre macro, le calcul s’arrête sur les premières lignes. il est sensé continuer le traitement jusqu'à la fin du tableau.

Merci

bonsoir,

la macro s'arrête dès quelle rencontre une cellule vide en colonne A.

Bonjour à tous

Une variante sans couleur...

Bye !

Bonjour!

Merci à toi gmb, c'est parfait.

Cordialement