Rechercher les différentes occurrences d'un tableau

Bonjour,
J'ai un tableau T1 de type
T1 Ligne 1 : A,B,C,D,E,F,G,H,I,J
T1 Ligne 2 : 3,1,2,3,1,1,4,2,1,3
J'ai un tableau T2 de type
T2 Ligne 1 : 3,3,3,4,2,2 cette ligne varie en permanence, la seul certitude c'est que j'ai TOUJOURS le bon nombre d'occurence, par exemple si il y a en T1 3 lettres avec 3 , j'aurai en T2 L1 par plus de 3 colonnes avec 3
et je voudrais obtenir en ligne 2
T2 Ligne 2: A,D,J,G,C,H
Je vous demande de l'aide pour remplir la T2 ligne 2, avec un rechercheV je n'obtiens que la 1ere occurence, et si il y en a plus je ne sais pas comment les trouver.
Merci de votre aide.

NB : J'ai fait un fichier exemple

Je cherche à déterminer par une formule les cellules en jaune

Bonjour,

A valider en matricielle en B6 via CTRL + SHIFT + ENTER puis en décalant vers la droite :

=INDEX($A$1:$U$1;PETITE.VALEUR(SI($A$2:$U$2=B5;COLONNE($A$1:$U$1));NB.SI($B$5:B5;B5)))

Et pareil en B10 :

=INDEX($A$1:$U$1;PETITE.VALEUR(SI($A$2:$U$2=B9;COLONNE($A$1:$U$1));NB.SI($B$9:B9;B9)))

Cdlt,

Alors là je dis bravo.

Merci beaucoup pour ton aide.

Bonjour

Bonjour à tous

Une variante VBA

Option Explicit

Dim tabloP, tabloV
Dim jV&, jP&

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)

    If Target <> "Produit" Or Target.Column <> 1 Then Exit Sub
    Cancel = True
    tabloP = Range("A1").CurrentRegion
    Range(Target.Offset(0, 1), Target.End(xlToRight)).ClearContents
    tabloV = Target.CurrentRegion

    For jV = 2 To UBound(tabloV, 2)
        For jP = 2 To UBound(tabloP, 2)
            If tabloP(2, jP) = tabloV(2, jV) Then
                tabloV(3, jV) = tabloP(1, jP)
                tabloP(2, jP) = ""
                Exit For
            End If
        Next jP
    Next jV
    Target.CurrentRegion = tabloV
End Sub

Bye !