CNouveau venuClaulemaInscrit le :11/12/2023Dernière activité :23/10/2025 à 21:23Version d'Excel :2021Messages2Votes0Fichiers0Téléchargements0SujetsMessagesStatistiquesVotes reçus Messages postés par ClaulemaDateAuteur du sujetSujetExtrait du message28/12/2023 à 18:26Claulema Tri sur liste code postal d'une listboxJe viens de trouver le code ci dessous qui a l'air de fonctionner Dim i As Long Dim j As Long Dim k As Variant ReDim sTemp(UBound(Me.ListBox2.List, 1)) With Me.ListBox2 For j = LBound(.List) To UBound(.List) - 1 Step 1 For i = LBound(.List) To UBound(.List) - 1 Step 1 If .List(i) > .List(i + 1) T...28/12/2023 à 18:05Claulema Tri sur liste code postal d'une listboxJ'ai un code qui m'affiche dans une listbox des codes postaux, je souhaiterai les trier par ordre croissant, voici le code qui m'affiche cette listbox Dim i As Integer ListBox2.Clear For i = 2 To Range("E1000").End(xlUp).Row If UCase(Left(Cells(i, 5), Len(TextBoxCodepostalClient.Text))) = UCase(Text...Forums