XL 2010 Formule - Recherche selon 4 critères dans 3 autres feuilles

[tchi456]

Bonjour,

Je recherche une formule à mettre dans les cellules C5, C6 et C7 pour rechercher selon 4 critères les valeurs se trouvant dans les tableaux des 3 autres feuilles de mon fichier.

Pouvez-vous m'aider?

Mes meilleures salutations,

Thierry

 

[JHA]

Bonjour à tous,

A essayer avec la fonction indirect

=DECALER(INDIRECT("'Classe "&$C$1&"'!B3");EQUIV($C$3;INDIRECT("'Classe "&$C$1&"'!A4:A75");0)+CHOISIR(EQUIV($C$4;Précision;0);0;1;2;3);EQUIV($C$2;INDIRECT("'Classe "&$C$1&"'!C2:N2");0)+CHOISIR(EQUIV($B5;{"T";"F0 min";"F0 max"};0);0;1;2))

Copier vers le bas

JHA

 

[sylvanu]

Bonjout Tchi,
Bonjour JHA, toujours les mêmes à labour.
Mais comme c'est fait, autant livrer. Un solution en PJ avec une macro événementielle :

Sub Worksheet_Change(ByVal Target As Range)
On Error GoTo Fin: If Target.Count > 1 Then Exit Sub
    If Not Intersect(Target, [C1:C4]) Is Nothing Then
        Application.ScreenUpdating = False
        On Error GoTo Fin
        Set F = Sheets("Classe " & Replace([C1], ",", ".")) ' Quelle feuille ?
        C = Application.Match([C2], F.[2:2], 0)             ' Quelle colonne ?
        L = Application.Match([C3], F.[A:A], 0)             ' Quelle ligne ?
        Classe = Application.Match([C4], F.Range(F.Cells(L, 2), F.Cells(L + 3, 2)), 0)  ' Quelle classe ?
        L = L + Classe - 1                                  ' Ligne avec Diamètre+Classe
        Application.EnableEvents = False
        [C5] = F.Cells(L, C) & " Nm"                        ' Copie des trois valeurs T, Fmin, Fmax
        [C6] = F.Cells(L, C + 1)
        [C7] = F.Cells(L, C + 2)
        Application.EnableEvents = True
        Exit Sub
    End If
Fin:
    [C5:C7].ClearContents                                   ' Si non trouvé, on efface tout.
    Application.EnableEvents = True
    Application.ScreenUpdating = True
End Sub

 

[chris]

Bonjour à tous
Un autre jeu de formules

 

[tchi456]

Bonjour Sylvanu et Chris,

@Chris C'est exactement ce dont j'avais besoin (sans passer par du VBA).

Merci à vous deux et bon début de semaine.

 

[chris]

RE

Ne pas oublier JHA qui a aussi participé

 

[tchi456]

Re,

Oui pardonnez-moi JHA je vous ai oublié. Merci à vous aussi pour votre aide.

Bonne journée à tous!