Excel- VBA : LISTEBOX order By Date
Bonjour,
j'ai une ListeBox de 13 colonnes qui affiche les enregistrements d'une feuille (production).
je veux que les lignes de Listebox soient en ordre de plus récent aux plus anciens .
s'achat que la colonne qui contient les dates c'est la colonne 3 ( C) .
merci d'avance
j'ai une ListeBox de 13 colonnes qui affiche les enregistrements d'une feuille (production).
je veux que les lignes de Listebox soient en ordre de plus récent aux plus anciens .
s'achat que la colonne qui contient les dates c'est la colonne 3 ( C) .
merci d'avance
Sub Refresh_data_lavage()
Dim sh As Worksheet
Set sh = ThisWorkbook.Sheets("Production")
Dim last_Row As Long
last_Row = Application.WorksheetFunction.CountA(sh.Range("A:A"))
With Me.ListBoxlavage
.ColumnHeads = True
.ColumnCount = 13
.ColumnWidths = "25;25;60;40;40;40;50;50;30;50;50;50;50"
If last_Row = "1" Then
.RowSource = "Production!A2:M2" & last_Row
Else
.RowSource = "Production!A2:M" & last_Row
End If
End With
'id IdLav Date H Début H Fin Durée Qté N Agents PTu MOIS ANNEE Cout/C Agent/C
End Subg
Bonjour
Tu devrais joindre ton fichier, même avec des données bidonnées (Ex : Nom 1, Nom 2 Nom 3...)
Bye !
@gmb voila le fichier
g
@gmb
excellent mon ami !
merci beaucoup !