Chercher nombre d'article FindNext

Bonjour,

Je n'arrive pas à résoudre mon problème

J'avais essayer mais il n'affiche pas les résultats dans l'ordre (FindfNext)

J'ai 2 tableaux celui de gauche c'est un retour de données

Celui de droite et en colonne L c'est moi qui lui indique des chiffres, je voudrais qu'il me donne dans l'ordre les prénoms associé à ces chiffres

Je vous laisse un exemple de fichier afin de mieux comprendre

Merci pour votre aide

capture 2022 12 26 a 07 50 54
11findnext.xlsm (20.17 Ko)

Bonjour,

A tester si cela correspond à la demande

Un double-clic sur le chiffre de la colonne L et l'inscription s'effectue

13findnext.xlsm (16.93 Ko)

Merci M12,

Super

Juste un petit truc

Les données en colonne L, je les amènes moi même mais c'est un copier coller , pas moyen de mettre un bouton plutôt que faire cellule par cellule ?

Re,

Aucun soucis, teste

11findnext.xlsm (18.40 Ko)

Bonjour,

Autre méthode avec utilisation d'une variable tableau(plus rapide)

le code

Sub Recherche_Prenom()
    Dim j As Long, n As Long
    Application.ScreenUpdating = False
    DerLig = Range("D2").End(xlDown).Row
    Range("M2:T" & DerLig).ClearContents
    For j = 2 To DerLig
        Valeur = Cells(j, "L")
        With Range("D1:I26")
            Set x = .Find(Valeur, lookat:=xlWhole)
            If Not x Is Nothing Then
                Pos = x.Address
                n = 0
                ReDim nom(n) As String
                Do
                    nom(n) = Cells(x.Row, "D")
                    n = n + 1
                    ReDim Preserve nom(n)
                    Set x = .FindNext(x)
                Loop While x.Address <> Pos And Not x Is Nothing
            End If
        End With
        If n > 0 Then Cells(j, 13).Resize(1, n) = nom
        Erase nom
    Next j
End Sub

Cdlt

Merci à vous deux, je suis en train de les adapter sur mon vrai fichier ..

Trop simple lorsque l'on voit vos travaux, mais lorsqu'il s’agit de le faire soit même on se gratte la tête :)

Bonjour à tous !

Une proposition, sans VBA mais avec Power Query :

Merci JFL, je garde au boulot ils ne sont pas adepte aux Macros et encore moins à Power query, c'est pourtant l'avenir

Rechercher des sujets similaires à "chercher nombre article findnext"