VBA - Vertical Scroll en ComboBox, ListBox et TextBox (ActiveX en Feuille et en UserForm) V11

Dudu2

XLDnaute Barbatruc

• 3 Novembre 2022

• #1

Dudu2 a soumis une nouvelle ressource:

VBA - Srroll en ComboBox et ListBox (ActiveX et UserForm) - Finis les ascenseurs laborieux, la molette de la souris vous offre la liberté

Le fichier à télécharger contient:

1. Le Module_Scroll_ListBox_ComboBox à importer dans le projet VBA.
2. Des UserForms de test contenant des ComboBoxes et des ListBoxes
3. Une feuille de test contenant une ComboBox et une ListBox ActiveX

Les principales caractéristiques:

• Permet le Scroll dans les Controls ComboBox et ListBox ActiveX et UserForm

Mise en œuvre très simple:

• ...

Cliquez pour agrandir...

En savoir plus sur cette ressource...

 

Gégé-45550

XLDnaute Accro

• 6 Novembre 2022

• #2

Un travail superbe ! Bravo !

 

T

Toubabou

XLDnaute Impliqué

• 9 Novembre 2022

• #3

Bonjour,
Pour ma part, j'ai un message d'erreur:

Puis:


Merci pour votre aide
Toubabou

 

Dudu2

XLDnaute Barbatruc

• 9 Novembre 2022

• #4

Bonjour @Toubabou,
As-tu inséré le Module_Scroll_ListBox_ComboBox dans ton projet VBA ?
Sinon, il faut ouvrir le fichier téléchargé, aller dans la fenêtre VBA et faire un "drag & drop" du module en question vers ton projet.

 

Dernière édition: 9 Novembre 2022

T

Toubabou

XLDnaute Impliqué

• 9 Novembre 2022

• #5

Bonjour Dudu2,
J'ai copié le code et double clique sur ma ListBox1 et collé le code

 

Dudu2

XLDnaute Barbatruc

• 9 Novembre 2022

• #6

Tu n'as pas répondu à la question;
As-tu insérer le Module_Scroll_ListBox_ComboBox dans ton projet VBA ?
C'est ce module qui contient les fonctions utiles.

 

T

Toubabou

XLDnaute Impliqué

• 9 Novembre 2022

• #7

Alors je viens de refaire la manipulation et effectivement cela fonctionne super bien.
Merci beaucoup

 

Usine à gaz

XLDnaute Barbatruc

• 9 Novembre 2022

• #8

Bonsoir Dudu2
Quel travail ça a été lol
Bravo pour ton courage et ta ténacité.
Beau résultat Bravo à toi.
Bonne fin de journée

 

T

Toubabou

XLDnaute Impliqué

• 9 Novembre 2022

• #9

Alors pour profiter pleinement de ce super travail encore une question :
"Est-il possible de supprimer l'ascenseur vertical,?"
Bonne soirée à tous

 

Dudu2

XLDnaute Barbatruc

• 9 Novembre 2022

• #10

"Est-il possible de supprimer l'ascenseur vertical,?"

Cliquez pour agrandir...

J'ai vu des sujets sur ce thème dans différents forums, par exemple ici:

Disable listbox Vertical Scrollbar in Excel VBA

i wondering how to disable the listbox scrollbar.Because i already have a scroll bar which can control both textbox scroll together at the same time. As i know,For Horizontal just add the width, how

stackoverflow.com

Ceci dit, la présence de l'ascenseur vertical indique qu'il y a des items de la liste qui sont au-dessus et/ou au-dessous de la partie visible. Cela invite l'utilisateur à y aller voir, car une liste qui s'affiche complètement n'aura pas d'ascenseur vertical.
Si la liste n'est pas longue, il suffit alors d'ajuster la hauteur de la ListBox (ListBox.Height) ou le nombre d'items affichés en ComboBox (ComboBox.ListRows) pour faire disparaître naturellement l'ascenseur vertical.

 

T

Toubabou

XLDnaute Impliqué

• 9 Novembre 2022

• #11

Merci beaucoup pour l'information

 

Dudu2

XLDnaute Barbatruc

• 10 Novembre 2022

• #12

Nouvelle version V3 toute fraiche.

 

T

Toubabou

XLDnaute Impliqué

• 10 Novembre 2022

• #13

Bonsoir à tous,
Merci beaucoup
Jean Marie

 

A

Alain 79

XLDnaute Junior

Supporter XLD

• 13 Novembre 2022

• #14

Bonsoir,
Cette solution est très intéressante surtout lorsque l'on a une liste longue.
J'ai donc installé ce module et créé une Combo box dans ma feuille mais lorsque je clique sur un des éléments j'ai un message d'erreur :

Si je clique sur le bouton débogage VBA s'ouvre :

Pourquoi ??

 

Dudu2

XLDnaute Barbatruc

• 13 Novembre 2022

• #15

Bonsoir,
Aucune idée ! Je n'arrive pas à reproduire, même en plaçant la valeur sur une autre feuille que celle de la ComboBox1.
Sheets("Data") est protégée ?
En quelle version Windows et version Office et 32 ou 64 Bits Office es-tu ?
Est-ce que tu aurais un fichier à envoyer pour tester ?