Filtre avec doublon

Bonjour, j'ai encore besoin de votre aide je vous explique deux tableaux dans la feuille tableau 1 trié sur le num de facture tableau 2 trié sur le nom cela ce fait avec une macro.Au dessus du tableau une liste déroulante sur nom

ce que j'essaye de faire c'est que quand je choisi sur la liste déroulante un nom il doit trié sur tout les nom et m'afficher dans le tableau 3 la ou les données merci d'avance

Bonsoir,

Tu n'as pas besoin de faire 2 tableaux (sources d'erreurs)

Vois cette proposition

Private Sub Worksheet_Change(ByVal Target As Range)

    '--- Filtre noms ---
    If Not Application.Intersect(Target, Range("c4")) Is Nothing Then
        On Error Resume Next
        ActiveSheet.ShowAllData
        On Error GoTo 0

        Range("a8:g" & [a65000].End(xlUp).Row).AdvancedFilter Action:=xlFilterCopy, CriteriaRange:= _
        Range("c3:c4"), CopyToRange:=Range("j8:p8"), Unique:=False
    End If

    '--- choix tri ---
Dim Cl%
    If Not Application.Intersect(Target, Range("c2")) Is Nothing Then
        Cl = WorksheetFunction.Match(Target, Range("a8:g8"), 0)

        Range("a10:g" & [a65000].End(xlUp).Row).Sort Key1:= _
        Cells(10, Cl), Order1:=xlAscending, Key2:= _
        Cells(10, 2), Order2:=xlAscending, Header:=xlNo, OrderCustom:=1, MatchCase:= _
        False, Orientation:=xlTopToBottom
    End If
End Sub

Amicalement

Claude

Tout simplement bravo et un grand merci c'est exactement ce qu'il me faut le forum est genial