Discussion :

[tico06]

Bonjour a tous,

J'ai un problème avec le trie par date dans un tableau structuré.
Les dates saisies dans les cellules de ma colonne sont bien au format date(cellules formatées date jj/mm/aaaa).
Mais lorsque que j'effectue mon trie celui-ci ne se fait pas en tenant compte de la date complète mais uniquement en tenant compte du premier chiffre soit le jour.
Exemple date saisie dans colonne : 10/12/2019 - 04/05/2019 - 01/02/2020 - 22/04/2019 - 06/03/2020
Une fois le trie fait j'obtiens : 01/02/2020 - 04/05/2019 - 06/03/2020 - 10/12/2019 - 22/04/2019

Le code utilisé (qui me donne le même résultat que le bouton filtre du tableau)

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
'Trie du tableau adhérents par Date croissante
Private Sub CommandButtonTriDateAZ_Click()
    ActiveSheet.Unprotect "xxx"
    NomTableau = "TableauAdherents"
    Range(NomTableau).Sort key1:=Range(NomTableau & "[PAYEMENT_ COTISATION]"), Header:=xlYes, Order1:=xlAscending
    ActiveSheet.Protect "xxx", True, True, True
    Unload Me
End Sub

Merci d'avance pour votre aide

[78chris]

RE

Le format ne préjuge pas du type des données : sans doute du texte

[Patrice740]

Bonjour,

Il y a une méthode très simple pour savoir si la date est un texte ou un nombre : mettre les cellules en alignement horizontal Standard (et les élargir suffisamment) :

[tico06]

Merci patrice,

bien vu les dates étant remplies via une textbox j'ai modifier le code pour qu'elle s’écrivent au format date via :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

ActiveSheet.ListObjects("TableauAdherents").DataBodyRange(1, 6).Value = CDate(Me.TextBoxDate)

Encore merci pour ton aide

[78chris]

Re

Ou sélectionner les dates et vérifier dans la barre d'état si le nombre de non vides est égal au nombre de nombres

rien à changer, juste une sélection