Autres Ranger Ligne par date croissante

Dimitry

XLDnaute Nouveau
Bonjour le forum,

Malgré plusieurs recherches dans les sujets existants et sur internet je n'ai pas trouvé réponse à ma question. Je suppose que pour vous ce sera facile, je m'explique:
Vous trouverez à la fin de mon message le lien pour un fichier excel qui me sert de planning (trop lourd pour le mettre en PJ).

La colonne C détermine le premier jour de chaque étape: F1 / F2 / P1 / P2 / D (que vous trouverez dans liste déroulante de la première colonne). Une étape = une ligne
Je souhaiterais que les lignes se rangent automatiquement en fonction de la date de la colonne C.
Il est possible que plusieurs lignes aient la même dates.

www.grosfichiers.com/cUsu3uREBxj
(excel 2007)

N'hésitez pas si vous avez des questions,

Merci par avance,

Dimitry
 

sylvanu

XLDnaute Barbatruc
Supporter XLD
Re, Just for the fun
En PJ une solution de tri avec un bouton attaché à cette macro :
VB:
Sub Tri()
    Application.ScreenUpdating = False
    DL = Range("A65500").End(xlUp).Row                  ' Dernière ligne
    DC = Application.CountIf(Range("2:3"), "*")         ' Dernière colonne
    Set Plage1 = Range(Cells(6, "A"), Cells(DL, DC))    ' Plage de tri
    Set Plage2 = Range(Cells(6, "C"), Cells(DL, "C"))   ' Plage de critères

    Plage1.Select                                       ' Tri sur plage du plus récent au plus ancien
    ActiveWorkbook.ActiveSheet.Sort.SortFields.Clear
    ActiveWorkbook.ActiveSheet.Sort.SortFields.Add Key:=Plage2 _
        , SortOn:=xlSortOnValues, Order:=xlDescending, DataOption:=xlSortNormal
    With ActiveWorkbook.ActiveSheet.Sort
        .SetRange Plage1
        .Header = xlGuess
        .MatchCase = False
        .Orientation = xlTopToBottom
        .SortMethod = xlPinYin
        .Apply
    End With
    
    [A1].Select
End Sub

PJ : https://www.cjoint.com/c/KCni7FMz8AY
 

Dimitry

XLDnaute Nouveau
Du plus ancien au plus récent,
Ou plutôt du plus ancien au "plus tard" car il y a surtout des dates futures, par exemple:
25 / 03 / 21
27 / 03 / 21
09 / 07 / 21
25 / 09 / 21
[...]

C'est ce qu'il me fallait (fonction tri)
Très simple mais je connaissais pas cette fonction pourtant basique,
Encore merci et bon week end
 

Discussions similaires

Réponses
28
Affichages
1 K
Réponses
7
Affichages
309

Statistiques des forums

Discussions
311 720
Messages
2 081 913
Membres
101 837
dernier inscrit
Ugo