Re bonjour à tous et toutes
Mon projet avance bien, je suis à la recherche désormais d'une petite amélioration
J'ai un UserForm qui affiche 1300 lignes issues d'un fichier excel par le biais d'une ListBox
Voici le code de ce UserForm
Naviguer dans cette listbox n'est pas chose aisée, vu sa longueur
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5 Private Sub UserForm_Initialize() Workbooks.Open "e:\1-AFF\AAA\00Base\BaseMateriels\NovoMaterBAse.xls" ActiveWindow.WindowState = xlMinimized ListBox1.RowSource = "[NovoMaterBAse.xls]BAseListe!B3:B1300" End Sub
D'ailleurs, la roulette de la souris n'a pas d'effet sur le défilement
J'ai une TextBox dans ce UserForm
Je souhaite pouvoir modifier l'affichage dans la listBox en fonction de ce qui est saisi dans la TextBox
Par exemple, je saisis "M", l'affichage de la liste box se positionne sur "machine", si je tape "mo" cela passe à "moteur" ....
Avez vous une piste ?
De nouveau merci par avance pour votre aide
Daniel
Partager