Tri données

Bonjour à toutes et tous,

Je souhaite faire une sorte de filtre qui permet d'afficher en une seule fois une donnée qui apparaît plusieur fois.

J'aimerais qu'en appuyant sur le bouton récapitulatif, les noms présents dans la colonne A apparaisent qu'une seule fois dans la colonne G,

Par exemple, dans la colonne A, le nom "TATA" apparaît 3 fois, J'aimerais que la macro ne l'affiche plus qu'une fois dans la colonne G,

J'espère avoir été clair, Merci d'avance pour vos réponses,

9test-tri.xls (15.00 Ko)

Bonjour;

Une façon de faire,

avec en prime un tri

Sub SansDoublons()
Dim Lg&
    Application.ScreenUpdating = False
    Lg = Range("a" & Rows.Count).End(xlUp).Row
    Range("g1") = Range("a1")
    Range("a1:a" & Lg) _
    .AdvancedFilter Action:=xlFilterCopy, CopyToRange:=Range("g1"), Unique:=True
    Range("g1") = "Noms sans doublons" 'en-tête au choix
    '--- tri (facultatif) ---
    Range("g2:g" & Lg).Sort _
        Key1:=Range("g2"), Order1:=xlAscending, _
        Header:=xlNo, OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom
End Sub

Amicalement

Claude

Merci beaucoup Claude, je l'ai adapté à mon fichier réel et sa marche à merveille. Merci encore. A plus peut être.

Petite remarque au passage :

en haut à droite du poste qui t'as donné la solution à ton problème!

Rechercher des sujets similaires à "tri donnees"