Autres Tri alphabétique liste d’une ComboBox, qui fonctionne mal

Jacky 17 · 11 Janvier 2024

Bonjour Forum

Je vous souhaite mes meilleurs vœux pour 2024

Tout d’abord je tiens à remercier les personnes qui m’ont déjà aidé

Dans les messages des forums j’ai trouvé des macros qui tri la liste d’une ComboBox

Celle que j’ai retenu sur XLD fonctionne, mais le seul problème :

Il y a deux listes une triée et une non triée

Comment faire pour n’avoir que la liste triée :

Dans recherche par désignation

L’enregistrement des outils n’est pas trié cela est fais au fur à mesure des enregistrements

Je tourne en rond depuis deux mois

Je ne connais toujours pas l’Anglais ni vraiment les Macro et VB,

Au petit bonheur la chance

Excel 2003

Merci d'avance pour votre aide si précieuse.

Je reste à votre disposition s’il manque des explications

Je vous souhaite une bonne fin de journée

Cordialement

Jacky

https://www.cjoint.com/c/NAlkk7f70Yf

Jacky 17 · 11 Janvier 2024

Gégé-45550 à dit:

Bon,
après examen plus approfondi,
Il suffit de supprimer la ligne ComboBox2.AddItem Cible
l SUB devient ainsi :

VB:

Private Sub UserForm_Initialize()
   
     Dim Cible As Range   ' ' '
   '  https://excel-downloads.com/threads/trier-une-liste-dans-un-combobox.113901/
Dim i As Byte, j As Byte
Dim temp As String
   For n = 2 To Sheets("stock").Range("B5000").End(xlUp).Row
  ComboBox2.AddItem Sheets("stock").Range("B" & n)
    Next n
With ComboBox2
    For i = 0 To .ListCount - 1
     For j = 0 To .ListCount - 1
      If .List(i) < .List(j) Then
        temp = .List(i)
        .List(i) = .List(j)
        .List(j) = temp
      End If
     Next j
    Next i
End With   ' ' '

 '...

TooFatBoy · 11 Janvier 2024

Jacky 17 à dit:
J’aurais bien mis mon classeur a par CiJoint vu son poids

Je ne comprends pas le sens de cette phrase pour le moins étrange, mais je répète que le fichier que tu as posté sur cjoint ne fait pas 1,6 Mo, mais moins de 300 ko, donc il passait sans problème posté directement dans ton message initial.

Jacky 17 · 11 Janvier 2024

TooFatBoy à dit:
Je ne comprends pas le sens de cette phrase pour le moins étrange, mais je répète que le fichier que tu as posté sur cjoint ne fait pas 1,6 Mo, mais moins de 300 ko, donc il passait sans problème posté directement dans ton message initial.

Re
Gégé-45550
Je fait un essai
effectivement il viens de passer
Encore Merci Merci Merci
Bonne soirée
Cordialement
Jacky

TooFatBoy · 11 Janvier 2024

Mes questions sur l'utilisation des trois dernières colonnes d'une feuille était pour savoir si tu pouvais mettre ces trois dernières colonnes dans d'autres colonnes (moins proches de la fin de la feuille) voire dans une autre feuille, car sur les anciennes versions d'Excel ça bouffait énormément de place pour rien, ce qui créait des fichiers beaucoup plus gros que nécessaire.

Sur ce, bonne soirée également.

Jacky 17 · 11 Janvier 2024

TooFatBoy à dit:
Mes questions sur l'utilisation des trois dernières colonnes d'une feuille était pour savoir si tu pouvais mettre ces trois dernières colonnes dans d'autres colonnes (moins proches de la fin de la feuille) voire dans une autre feuille, car sur les anciennes versions d'Excel ça bouffait énormément de place pour rien, ce qui créait des fichiers beaucoup plus gros que nécessaire.

Sur ce, bonne soirée également.

Re
j'en Prend note
Et encore Merci
bonne soirée
jacky 17

Autres Tri alphabétique liste d’une ComboBox, qui fonctionne mal

Jacky 17

XLDnaute Nouveau

Jacky 17

TooFatBoy

XLDnaute Barbatruc

Jacky 17

XLDnaute Nouveau

Pièces jointes

TooFatBoy

XLDnaute Barbatruc

Jacky 17

XLDnaute Nouveau

Discussions similaires