Index/Equiv Simulation Chiffre d'affaire avec nouveau Tarif

[LEFRED]

Bonjour

dans le fichier ci-joint, en format base de données, j'ai

colonne 1 : article
colonne 2 : Tranche Qté
colonne 3 : Prix pour la qté

Quelle est la formule en D20 ou D21 ?

en vous remerciant....

Fred

[tototiti2008]

Bonjour Lefred,

La solution n'est peut-être pas parfaite, mais dis-moi ce que tu en penses...

[LEFRED]

Bonjour

Je te remercie pour ta réponse rapide.

Mais l'affaire est un peu plus compliqué car la recherche porte sur 2 champs : l'article et sa qté.
Il faut savoir que je dois faire cette simulation sur 10 000 lignes avec des qtés réelles 2007 qui varient de 1 à 5000 ....

Quelqu'un a déjà vu ce cas de figure ; sans faire appel à VBA.

Dans cette attente...

à bientôt

Fred

[BOISGONTIER]

Bonjour,

Voir PJ

=INDEX(prix;EQUIV(1;(code=B20)*(qte<=C20);0))


=INDEX(prix2;EQUIV(B7;Code2;0);EQUIV(C7;Qte2;1))

JB
Formation Excel VBA JB

[LEFRED]

Bonjour

Cas 1 : Merci car celà fonctionne bien avec une formule matricielle avec Qté triée en décroissant et comme je suis pris par le temps...
Simplement sur 10k lignes, le recalcul est un peu long et c'est pour celà que je voulais éviter de faire appel à la matrice. Il doit y avoir une formule plus élégante qui combine INDEX, EQUIV, en jouant avec des positions ou des n° de lignes... et qui évite des temps de recalcul (un peu comme quand on remplace un sommeprod par un somme.si)
Je lance le challenge ! Si je trouve la réponse, je la posterai.

Cas 2 : Il peut malheureusement y avoir autant de tranche de qté (et donc de colonnes) que d'article... Donc la solution en colonne n'est pas celle que je recherchais... Je la connaissais par ailleurs...

En tous les cas, Merci pour votre rapidité. Je vais essayer de trouver le temps de participer de manière active à ce forum.

à bientôt
FRED

[BOISGONTIER]

Sans formule:

Private Sub Worksheet_Change(ByVal Target As Range)
  If Not Intersect([B20:C21], Target) Is Nothing Then
    lig = Target.Row
    Cells(lig, 4) = _
       Evaluate("INDEX(prix3,match(1,(code3=" & Cells(lig, 2) & ")*(qte3<=" & Cells(lig, 3) & " ),0))")
  End If
End Sub

JB