Tri de 2 colonnes en vba

Résolu
JulienHch Messages postés 22 Statut Membre -  
JCB40 Messages postés 3058 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour

Je dispose de deux colonnes A et B

Dans la colonne A se trouve du texte et dans la colonne B des chiffres

J'aimerai les trier par ordre décroissant

Exemple:

Colonne A

N°1
N°2
N°3

Colonne B

10
12
9

Je voudrais avoir au final :

Colonne A

N°2
N°1
N°3

Colonne B

12
10
9

Merci :)

Cdlmnt

3 réponses

  1. JCB40 Messages postés 3058 Date d'inscription   Statut Membre Dernière intervention   479
     
    Bonjour
    A tester
    A mettre dans un module de la feuille et adapter à la feuille

    Sub tri()
    '
    ' tri Macro

    '
    Sheets("Feuil1").Range("A1:B10").Select
    ActiveWorkbook.Worksheets("Feuil1").Sort.SortFields.Clear
    ActiveWorkbook.Worksheets("Feuil1").Sort.SortFields.Add Key:=Range("A1"), _
    SortOn:=xlSortOnValues, Order:=xlDescending, DataOption:=xlSortNormal
    With ActiveWorkbook.Worksheets("Feuil1").Sort
    .SetRange Range("A1:B10")
    .Header = xlNo
    .MatchCase = False
    .Orientation = xlTopToBottom
    .SortMethod = xlPinYin
    .Apply
    End With
    End Sub

    Cordialement
    1
    1. JulienHch Messages postés 22 Statut Membre
       
      merci pour la réponse cependant,
      les deux colonnes sont triées séparément, hors je veux que la Colonne A et la colonne B soient triées en fonction de la colonne B
      0
    2. JulienHch Messages postés 22 Statut Membre
       
      non ok c'est bon, j'ai modifié un paramètre et cela fonctionne, merci JCB40 :)
      0