Tri VBA sous condition

Version imprimable

12/02/2016, 18h00
nonesofar13

Tri VBA sous condition

Bonjour,

Je suis face à un probléme les amis. :lol:

Je souhaite trier une base en excel vba. Mon code de tri est effectué, mais je souhaite garder certaines valeurs en doublon car elles doivent rester en doublon.

Avez-vous des méthodes de tri des doublons sans tous les écraser?

Merci d'avance.

Bonjour,

La méthode Sort ?

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
 
    'Préparation du tri (sur les valeurs de la colonne C par ordre ascendant sur les valeurs)
    ThisWorkbook.Worksheets(1).Sort.SortFields.add _
    key:=Range("C:C"), _
    SortOn:=xlSortOnValues, _
    Order:=xlAscending, _
    DataOption:=xlSortNormal
    'Tri sur les colonnes A à H avec la clé de tri définie plus haut (il est possible d'en ajouter plusieurs)
    With ThisWorkbook.Worksheets(1).Sort
        .SetRange Range("A:H")  
        .Header = xlYes  'les données ont des en-têtes
        .MatchCase = False
        .Orientation = xlTopToBottom
        .SortMethod = xlPinYin
        .Apply
    End With

Letienne

15/02/2016, 09h00
nonesofar13

Merci de ta réponse,

je vais regarder ta solution.

Bonne journée.