XL 2016 VBA - Liste déroulante dynamique avec classement par ordre alphabétique

[Heodrene]

Bonjour,

Je souhaite :
1) Créer un menu déroulant dans une combox ActiveX de manière dynamique en récupérant la liste des feuilles existantes ;
2) Idéalement la classer par ordre alphabétique (c'est optionnel, pas du tout une obligation) ;
3) Lorsque je sélectionne la feuille dans le menu, que cette feuille s'active.

Le point 1) est fonctionnel, la priorité est maintenant sur le point 3) et j'avoue patauger dans la semoule malgré différentes tentatives.

Merci de votre aide,

Héodrène

 

[youky(BJ)]

Bonsoir et voici de retour le fichier
Tout est opérationnel
Bruno

PS un click droit de souris en bas à gauche ouvre une fenêtre prévu à cet effet

 

[Heodrene]

Nickel youky(BJ), merci !!!

Par contre pour info, pour ceux qui voudraient récupérer le code : j'ai été obligé de refaire la mise en forme du code dans la feuille ThisWorkbook.
Tel qu'il est livré; l'ouverture du fichier me met une erreur 1004.
Après juste avoir refait les tabulations, le message a disparu.

Merci encore !