patugui

patugui

XLDnaute Nouveau
Bonjour

Je souhaite que mes dates soit en ordre croissant mais que mes villes soit réunies, comment puis je faire ?
J'ai fait un 1er tri par date et un deuxième par regroupement de ville mais çà me donne un ordre de A à Z.

Je souhaite avec l'exemple ci dessous, que la ville SAINT SAULVE retrouve ces 4 lignes réunies et apparaissent en 1er car la date la plus proche est au 25/04.

Pouvez vous m'aider ?


1711112482509.png
 

Dranreb

XLDnaute Barbatruc
Bonsoir.
Alors je suis allez voir l'autre discussion, et il m'a semblé que le résultat n'était pas celui souhaité, mais plutôt celui obtenu par cette procédure :
VB:
Sub Tri()
   Dim RngTri As Range
   Columns(3).Insert
   Set RngTri = [A2].Resize([A1000000].End(xlUp).Row - 1, 3)
   RngTri.Sort Key1:=RngTri.Columns(2), Order1:=xlAscending, Key2:=RngTri.Columns(1), Order2:=xlAscending
   With RngTri.Columns(3): .FormulaR1C1 = "=IF(RC2<>R[-1]C2,RC1,R[-1]C)": .Value = .Value: End With
   RngTri.Sort Key1:=RngTri.Columns(3), Order1:=xlAscending, Key2:=RngTri.Columns(2), Order2:=xlAscending
   Columns(3).Delete
   End Sub
En somme 3 opérations fondamentales :
1) — Tri par Villes puis Date
2) — Dans une colonne libre ou créée à cet effet, mettre au moyen d'une formule la date la plus ancienne de chaque ville dans toutes ses lignes, et la figer.
3) — Tri par dates anciennes puis par Villes.
 

Discussions similaires

Réponses
9
Affichages
299
Réponses
5
Affichages
534

Statistiques des forums

Discussions
313 271
Messages
2 096 724
Membres
106 720
dernier inscrit
Alain EDZOA