Aide fonction VLOOKUP

  • Initiateur de la discussion Initiateur de la discussion vmax67
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

Re : Aide fonction VLOOKUP

Bonjour,
l'organisation de tes données ne te permet pas d'utiliser RECHERCHEV. Tu peux utiliser à la place la combinaison INDEX+EQUIV.
Pour les valeurs de la colonne B cela donne :
Code:
=INDEX(Feuil2!B$2:B$7;EQUIV(Feuil1!F9;Feuil2!$D$2:$D$7;0))
A toi d'adapter pour les autres colonnes en modifiant la plage située entre "INDEX(" et ";EQUIV(".
A+
 
Re : Aide fonction VLOOKUP

bonjour

une autre possibilité :

Code:
Private Sub Worksheet_Change(ByVal Target As Range)
Dim DerLig As Integer

If Not Application.Intersect(Target, Range("F9")) Is Nothing Then
    DerLig = Worksheets("Feuil2").Range("A" & Rows.Count).End(xlUp).Row

    With Worksheets("Feuil2")
        Set c = .Range("D1:D" & DerLig).Find(Target.Value, LookIn:=xlValues)
        If Not c Is Nothing Then
            Worksheets("Feuil1").Cells(Target.Row, 7) = .Cells(c.Row, 2).Value
            Worksheets("Feuil1").Cells(Target.Row, 8) = .Cells(c.Row, 1).Value
            Worksheets("Feuil1").Cells(Target.Row, 9) = .Cells(c.Row, 3).Value
        End If
    End With
End If

End Sub

Bonne suite
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Réponses
10
Affichages
150
Réponses
7
Affichages
338
Réponses
7
Affichages
508
Retour