XL 2016 somme de cellule selon critere

vgendron

XLDnaute Barbatruc

• 15 Mars 2018

• #2

bonjour
pas besoin de vba, une formule suffit avec Sommeprod
voir PJ

 

Pièces jointes

• test.xlsx

  8.7 KB · Affichages: 30

Vote positif 0 Vote négatif

gosselien

XLDnaute Barbatruc

• 15 Mars 2018

• #3

Bonjour tous,

une autre manière 🙂

P.

 

Pièces jointes

• test (12).xlsx

  14.9 KB · Affichages: 45

Vote positif 0 Vote négatif

C

cg1980

XLDnaute Occasionnel

• 23 Mars 2018

• #4

merci beaucoup de votre aide. Mais en fait j'aurais voulu le faire via VBA a titre d'exercie. Je l'ai fait d'une facon, mais pas vraiment efficiente.

 

Vote positif 0 Vote négatif

vgendron

XLDnaute Barbatruc

• 23 Mars 2018

• #5

hello
pour le fun avec un tablo VBA : une facon parmi tant d'autres

VB:

Sub sommer()
Dim tablo() As Variant

tablo = Range("C5:D26") 'on place le tablo excel dans un tablo vba
code = Range("G5") 'récupère le code à traiter
somme = 0 'initialisation
For i = LBound(tablo, 1) To UBound(tablo, 1) 'pour chaque ligne du tablo
    If tablo(i, 1) = code Then somme = somme + tablo(i, 2) 'si la première colonne = code, alors, on ajoute la seconde colonne à la somme
Next i
Range("G6") = somme 'on recopie le résultat
End Sub

 

Vote positif 0 Vote négatif