Microsoft 365 Tri et Formatage

Usine à gaz

XLDnaute Barbatruc
Supporter XLD
Bonjour à toutes et à tous,
Je vous souhaite une belle journée :)

Je bute sur un souci de tri et de formatage de cellules.

Dans le fichier test joint,
En colonne "D" l'affichage de la cellule est :
13.10.2021
00:00
Mes cellules colonne "D" affichent les heures/mn sous la date mais le classement est dans l'ordre Descendant

En colonne "F" l'affichage de la cellule est :
13 10 21 00:00
Mes cellules colonne "F" classent bien dans l'ordre Ascendant mais affichent les heures/mn sur la même ligne que la date

ma question :
Pour garder le même formatage de colonne/cellules que la colonne "D"
j'ai besoin de trier en "Ascendant" et d'afficher les heures/mn sur la même ligne que la date ?

Auriez-vous la solution ?
Je continue mes recherches.

Avec mes remerciements,
Amicalement,
lionel,
 

Pièces jointes

  • tri_test.xlsm
    22.8 KB · Affichages: 3
Solution
Bonsoir Lionel,

C'est une très mauvaise idée d'utiliser 2 colonnes.

Car avec le tri il y aura des interférences pour les hauteurs des lignes des 2 tableaux.

Utilise donc la seule colonne D et cette macro qui diffère peu de celle du post #6 :
VB:
Private Sub Worksheet_Change(ByVal Target As Range)
Dim c As Range
Application.ScreenUpdating = False
With Range("D2:D" & Rows.Count)
    .NumberFormat = "dd/mm/yyyy" & vbLf & "hh:mm"
    .RowHeight = 15
    .WrapText = False
    .Sort .Cells(1), xlAscending, Header:=xlNo 'tri croissant
    For Each c In .Resize(UsedRange.Rows.Count)
        If IsDate(c) Then
            c.RowHeight = 30
            c.WrapText = True
        End If
    Next
    .EntireColumn.AutoFit
    If .ColumnWidth <...

Usine à gaz

XLDnaute Barbatruc
Supporter XLD
Bonjour Gérard,
Merci d'être encore là :)

Dans le fichier joint (#post16), je ne traite que la col J.
Je voudrais juste inclure dans ton code la notion :
1634379319339.png

c'est cette ligne de code que je ne sais pas modifier :
".Sort .Cells(1), xlTextAsNumbers, xlAscending, Header:=xlNo"
et ça fonctionnera nickel dans mon fichier de travail.
lionel,
 
Dernière édition:

Discussions similaires

Statistiques des forums

Discussions
312 109
Messages
2 085 381
Membres
102 876
dernier inscrit
BouteilleMan