Recherchev resultats>1 sur # lignes à rapatrier sur # colonnes

emi -  
Frenchie83 Messages postés 2254 Statut Membre -
Bonjour,

J'ai besoin de rapatrier différents résultats d'une rechercheV dans différentes colonnes
Ci-dessous un modèle de base

Merci à vous tous

Feuille 1 (avec formule)

A B C D E
matricule imputation1 imputation2 imputation3 imputation4
1234 mep ghh
2345 ois
5698 fsd ddq
4444 gds

Feuille 2 - Fichier base

A
matricule imputation
1234 mep
2345 ois
1234 ghh
5698 fsd
4444 gds
5698 ddq

Le fichier 1 étant le fichier ou doivent être rapatrier les données du fichier 2

2 réponses

  1. Fahora Messages postés 949 Statut Membre 68
     
    ????

    Comment veux tu qu'on fasse quoi que ce soit avec ça ?

    Tu nous joins le fichier ? Où ça ?
    0
  2. Frenchie83 Messages postés 2254 Statut Membre 339
     
    Bonjouyr
    Avec une fonction personnalisée
    Function RecherchesMultiples(Matricule, Col)
        DerLigF1 = Sheets(1).[A1].End(xlDown).Row
        DerLigF2 = Sheets(2).[A1].End(xlDown).Row
        ReDim Imputation(DerLigF2) As String
        For i = 2 To DerLigF2
            If Sheets(2).Cells(i, 1) = Matricule Then Imputation(i) = Sheets(2).Cells(i, 2)
        Next i
        Mat = 1
        For i = 2 To DerLigF2
            If Imputation(i) <> "" Then
                Mat = Mat + 1
                If Mat = Col Then
                    RecherchesMultiples = Imputation(i)
                    Exit Function
                End If
            End If
        Next i
        If RecherchesMultiples = 0 Then RecherchesMultiples = ""
    End Function

    Positionnez-vous en B2, puis dans la barre de formule tapez:
    =RecherchesMultiples($A2;COLONNE())
    Puis tirez la formule vars le bas et vers la droite.
    Cdlt
    0