Recherche avec plusieurs critères

[eddy1975]

Bonjour le Forum,

Je souhaite que le tarif s'affiche en H4 selon plusieurs critères :
En B22 la valeur est soit >5 ou <5. Cela renvoi à deux tableaux dans l'onglet Fournisseur.
Ensuite la valeur de F4 (27 ; 34 ; 41 ; 54; 65) permet de définir le tableau de recherche ou la largeur en E4 et la longueur D4 permettent de déterminer le tarif à renvoyer en H4.

Dans l'exemple la valeur 964 doit s'afficher en H4.

Merci pour votre aide.

 

[vgendron]

Hello
une solution par vba avec une fonction perso et deux plages nommées
Cf PJ

 

[vgendron]

Edit:
Corriger le code de la fonction avec celui ci

Function Tarif(Vol As Range, Epaisseur As Range, Longueur As Range, Largeur As Range)

If Epaisseur = "" Then
    Tarif = ""
    Exit Function
End If
If Vol < 5 Then
    Set tablo = Range("TabInfCinq")
Else
    Set tablo = Range("TabSupCinq")
End If

Select Case Epaisseur
    Case 27
        ligne = 1
    Case 34
        ligne = 5
    Case 41
        ligne = 9
    Case 54
        ligne = 13
    Case 65
        ligne = 17
End Select

Select Case True
    Case Largeur <= 90
        ligne = ligne + 1
    Case Largeur > 90
        ligne = ligne + 2
End Select

Select Case True
    Case Longueur <= 800
        colonne = 2
    Case Longueur >= 1501
        colonne = 4
    Case Else
        colonne = 3
End Select

Tarif = WorksheetFunction.Index(tablo, ligne, colonne)
End Function

j'avais mal écrit le nom de la zone "TabSupCinq"

 

[Jocelyn]

Bonjour le Forum,
Bonjour eddy1975, vgendron,

pour le fun (maintenant que c'est fait) une solution par formule un peu capillotractée dut au tableau de donnée

Cordialement

 

[eddy1975]

Re,
Merci à tous les deux.
@+