J'ai utilisé le tri multiple et je voulais effacer le tri et appliquer un nouveau tri dans la même feuille mais cela ne fonctionnait pas, serait utile si quelqu'un peut m'aider avec ceci en guidant comment utiliser le code de compensation de tri dans le ci-dessous:Impossible d'effacer les données triées au préalable
Sheets("LEMC").Copy After:=Worksheets(Worksheets.Count)
ActiveSheet.Name = "Primary Owner"
LSTRW = Cells(Rows.Count, "A").End(xlUp).Row
With Sheets("Primary Owner")
.Range("A:O").Sort Key1:=Range("D1"), order1:=xlAscending, Header:=xlYes
.Range("A:O").Sort Key1:=Range("H1"), order1:=xlDescending, Header:=xlYes
.Range("P1") = "Test"
.Range("P2:P" & LSTRW).Formula = "=IF(D2=D1,1,0)"
.AutoFilter.Sort.SortFields.Clear
.Range("A:P").Sort Key1:=Range("P1"), order1:=xlAscending, Header:=xlYes
End With
experts Merci
Cordialement Suresh
Une fois que vous avez trié vous avez remplacé le contenu des lignes, donc si vous supprimez le tri, rien ne se passe. Vous devriez l'utiliser en fonction d'un RowID. – Luuklag
Vous voulez dire que ce que nous avons trié avant devrait être utilisé avec un signe opposé (Si utilisé ascendant alors nous devrions faire maintenant avec Descendant et si plus petit à plus élevé utilisé alors maintenant nous devrions faire le plus élevé au plus petit)? – suresh7860
Eh bien cela dépend complètement de ce que les données d'origine ressemblaient. En supposant que votre procédure de tri distribue les données au hasard, la seule façon de revenir aux données d'origine est d'ajouter une colonne séparée pour RowID avant le tri. Il vous suffit ensuite de donner aux cellules de ces colonnes la valeur correspondant au numéro de ligne dans lequel elles se trouvent. Ensuite, si vous voulez revenir à la situation d'origine, vous devez trier simplement RowID dans l'ordre croissant. – Luuklag