trier date et ordre des colonnes dans listBox

  • Initiateur de la discussion Initiateur de la discussion Willy
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

W

Willy

Guest
Bonjour à tous,
Je rencontre deux problème dans mon userform :
Je souhaiterai trier des dates par mois. les dates sont écrites au format jjjj j mmmm aaaa :
Mardi 24 avril 2003
Jeudi 17 janvier 2003
.....

J'utilise le script suivant pour créer des colonnes dans un ListBox:

Private Sub Userform_Initialize()
DerLigne = Sheets("EMPLOYEUR").Range("B1501").End(xlUp).Row
PlageList = Sheets("EMPLOYEUR").Range("G2:O" & DerLigne).Address

' Tri mes dates
Worksheets("EMPLOYEUR").Range("A2").Sort _
order1:=xlAscending, _
Key1:=Worksheets("EMPLOYEUR").Columns("O"), _
Header:=xlGuess

List_Result_Cal.ColumnCount = 9
List_Result_Cal.RowSource = "EMPLOYEUR!" & PlageList
List_Result_Cal.ColumnWidths = "200;0;40;120;0;0;0;0;80"
End Sub

Pas très orthodoxe au niveau de la fonction ColumnWidths ou je masque des colonnes par 0 point pour ne pas les afficher.
En fait Je souhaiterai créer des colonnes qui ne sont pas en ordre dans ma liste, par exemple avoir dans l'ordre :
La colonne 4;
La colonne 1;
La colonne 7; Etc ...
Cela est t'il possible ?
Merci à vous et bonne semaine
Willy
 
Salut Willy, Bonjour le Forum

Oui c'est possible mais là on passe à la vitesse supérieur en programmation avec des tableaux multicolonnes indexés séquentiellement (Dynamique Array)...

Si je me souviens bien j'ai fait un exemple pour toi à l'occasion d'un autre truc et j'avais utilisé un tableau basic (?)

Pour te donner une idée : regarde ce fil avec Anne => Filtre doublons d'une colonne et les range dans un tableau tu y trouveras aussi un algo pour faire un tri de base.

Bon courage
@+Thierry
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD
Assurez vous de marquer un message comme solution pour une meilleure transparence.

Discussions similaires

Retour