Sauvegarder ordre de tri personnalisé

Résolu/Fermé

mike the llama Messages postés 321 Date d'inscription vendredi 14 septembre 2007 Statut Membre Dernière intervention 6 septembre 2024 - 13 déc. 2014 à 13:01
mike the llama Messages postés 321 Date d'inscription vendredi 14 septembre 2007 Statut Membre Dernière intervention 6 septembre 2024 - 14 déc. 2014 à 16:18

Bonjour,

Je travaille sur un tableau Excel 2013 comportant de nombreuses lignes et colonnes.

J'ai souvent besoin de changer l'ordre de tri des lignes pour une meilleure visualisation, en sachant que je fais se succéder jusqu'à 7 niveaux dans la demande de tri.

Est-il possible de sauvegarder ces différents modes de tri ? Car je perds un temps considérable pour chaque fois indiquer quelle combinaison de niveaux je souhaite voir apparaître au niveau du tri...

Bien à vous tous !

A voir également:

Sauvegarder ordre de tri personnalisé
Excel trier par ordre croissant chiffre - Guide
Logiciel de sauvegarde gratuit - Guide
Comment sauvegarder toutes les données de mon téléphone - Guide
Sauvegarder favoris chrome - Guide
Story personnalisé facebook c'est quoi - Guide

1 réponse

Réponse 1 / 1

Gyrus Messages postés 3334 Date d'inscription samedi 20 juillet 2013 Statut Membre Dernière intervention 9 décembre 2016 524
13 déc. 2014 à 15:56

Bonjour,

L'enregistreur de macro a été fait pour toi.
https://www.commentcamarche.net/contents/1374-macros-comment-les-creer

A+

mike the llama Messages postés 321 Date d'inscription vendredi 14 septembre 2007 Statut Membre Dernière intervention 6 septembre 2024 9
13 déc. 2014 à 17:25

Bonjour Gyrus,

Merci pour cette solution !

J'ai réussi à créer ma macro qui marche nickel, sauf qu'elle n'agit "curieusement" (enfin pur moi) pas sur les lignes 4 et 5 de ma feuille Excel, quelles qu'elles soient (les lignes 1, 2 et 3 étant réservées aux titres).

Aurais-tu une idée d'où pourrait venir le problème ?

Gyrus Messages postés 3334 Date d'inscription samedi 20 juillet 2013 Statut Membre Dernière intervention 9 décembre 2016 524
13 déc. 2014 à 19:30

Tu peux regarder les plages associées aux tris dans ta macro.
(Macro > Modifier)

A+

mike the llama Messages postés 321 Date d'inscription vendredi 14 septembre 2007 Statut Membre Dernière intervention 6 septembre 2024 9 > Gyrus Messages postés 3334 Date d'inscription samedi 20 juillet 2013 Statut Membre Dernière intervention 9 décembre 2016
13 déc. 2014 à 20:19

Oui, j'y avais jeté un coup d'oeil, mais pour ce que j'en comprends, je n'y vois rien de suspect, il me semble qu'Excel est bien censé travailler sur la plage "A4:A207", or la macro ne porte dans les faits que sur la plage "A6:A207"... :

' Trie la feuille "suivi global" de la manière la plus lisible qui soit. Raccourci = CTL+SHIFT+M.
'
' Touche de raccourci du clavier: Ctrl+Shift+M
'
ActiveWorkbook.Worksheets("suivi_global").AutoFilter.Sort.SortFields.Clear
ActiveWorkbook.Worksheets("suivi_global").AutoFilter.Sort.SortFields.Add Key _
:=Range("A4:A207"), SortOn:=xlSortOnValues, Order:=xlAscending, _
DataOption:=xlSortNormal
ActiveWorkbook.Worksheets("suivi_global").AutoFilter.Sort.SortFields.Add Key _
:=Range("CO4:CO207"), SortOn:=xlSortOnValues, Order:=xlAscending, _
DataOption:=xlSortNormal
ActiveWorkbook.Worksheets("suivi_global").AutoFilter.Sort.SortFields.Add Key _
:=Range("CJ4:CJ207"), SortOn:=xlSortOnValues, Order:=xlAscending, _
DataOption:=xlSortNormal
ActiveWorkbook.Worksheets("suivi_global").AutoFilter.Sort.SortFields.Add Key _
:=Range("AS4:AS207"), SortOn:=xlSortOnValues, Order:=xlAscending, _
DataOption:=xlSortNormal
ActiveWorkbook.Worksheets("suivi_global").AutoFilter.Sort.SortFields.Add Key _
:=Range("AD4:AD207"), SortOn:=xlSortOnValues, Order:=xlAscending, _
DataOption:=xlSortNormal
ActiveWorkbook.Worksheets("suivi_global").AutoFilter.Sort.SortFields.Add Key _
:=Range("N4:N207"), SortOn:=xlSortOnValues, Order:=xlAscending, _
DataOption:=xlSortNormal
ActiveWorkbook.Worksheets("suivi_global").AutoFilter.Sort.SortFields.Add Key _
:=Range("B4:B207"), SortOn:=xlSortOnValues, Order:=xlAscending, _
DataOption:=xlSortNormal
With ActiveWorkbook.Worksheets("suivi_global").AutoFilter.Sort
.Header = xlYes
.MatchCase = False
.Orientation = xlTopToBottom
.SortMethod = xlPinYin
.Apply
End With
End Sub

Gyrus Messages postés 3334 Date d'inscription samedi 20 juillet 2013 Statut Membre Dernière intervention 9 décembre 2016 524 > mike the llama Messages postés 321 Date d'inscription vendredi 14 septembre 2007 Statut Membre Dernière intervention 6 septembre 2024
14 déc. 2014 à 10:14

La plage étant bien définie, il te reste à voir la structure de la feuille et le filtrage.
Difficile d'en dire plus sans voir le fichier.

A+

Problème résolu, ou plutôt pallié !

=> Le simple fait de passer ma cellule A1 en mode "filtrer par l'icône de la cellule sélectionnée" permet de faire en sorte que la macro s'applique sur tout la plage...

Je ne suis pas sûr que cette solution soit très orthodoxe, mais c'est déjà pas mal ;)

Merci beaucoup pour ton aide, Gyrus !

++

Discussions similaires

Tri les lettres d'un mot par ordre alphabétique

comment mettre en ordre alphabétique

Ordres des amies snap