XL pour MAC Recherche dans une base de donnée avec conditions

[vall]

Bonjour à tous,

Voilà je suis en train de traiter une base de donnée d'environ 150 lignes et je souhaite trouver une fonction qui simplifie celle que j'ai mise en place actuellement !

Pour résumer mon problème : Je cherche le prix d'un objet avec une spécificité en fonction de la quantité voulu par un client. (Les prix fixés sont par palier)
J'ai donc créer une liste pour tout les objets ainsi que des listes associé à chaque objet et sa spécificité.

Pour le moment la solution que j'ai trouvé est la suivante :
Utiliser la fonction "RECHERCHEV" associé à la fonction "SI.CONDITION" et la fonction "ET"
En effet cette association plutôt longue me permet de retrouver le prix par palier en fonction de l'objet et sa spécificité que j'aurai choisi par liste.

Pour résumer l'actuelle solution j'ai recréer une petite base de donnée.

Merci à ceux qui trouveront une fonction alternative plus simple !

 

[vall]

Ça ne fonctionne pas ce qu'il faudrait faire c'est rajouter à la base de donnée toutes les possibilités

 

[sylvanu]

Ci joint la V5. Par fonction perso.
Avec la formule j'ai trouvé d'autres erreur : si Qté<10, Si Qté est sur une limite on prend la valeur inférieure.
C'est plus simple par fonction, qui déjà se complique :

Function Prix(Objet, Spec, Qté)
Dim Qty(), Price(), N As Integer, L As Integer, i As Integer
    Prix = 0
    If Objet = "" Or Spec = "" Then Exit Function
    N = 0
    DerLig = Range("B65500").End(xlUp).Row
    tablo = Range("B3:E" & DerLig)
    For L = 1 To UBound(tablo)
        If tablo(L, 1) = Objet And tablo(L, 2) = Spec Then
            ReDim Preserve Qty(N)
            ReDim Preserve Price(N)
            Qty(N) = tablo(L, 3)
            Price(N) = tablo(L, 4)
            N = N + 1
        End If
    Next L
    For i = 0 To UBound(Qty)
        If Qté < Qty(0) Then Prix = Price(0)
        If Qté >= Qty(UBound(Qty)) Then Prix = Price(UBound(Qty))
        If Qté >= Qty(i) Then Prix = Price(i)
    Next i
End Function

 

[vall]

Super, ça a l'air de bien fonctionner !