Produit = UCase(.Cells(L, "B")): Cond = UCase(Cells(L, "D")): Qté = 0
For Lprod = 3 To DL
' Si c'est le bon produit avec le bon conditionnment
If UCase(F.Cells(Lprod, "B")) = Produit And UCase(F.Cells(Lprod, "D")) = Cond Then
' On ajoute la quantité
Qté = Qté + F.Cells(Lprod, "C")
End If
Next Lprod