Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Flatscrollbar

B

Ben

Guest
Salut! bien réveillés?

Voilà G un petit problème : je voudrais remplacer la scrollbar bateau des listbox (ds un userform) par la flatscrollbar, mais je ne connais pas trop l'utilisation de ce contrôle!! G déjà réussi à faire un truc approximatif en faisant en sorte que le nombre de lignes de la listbox soit le max de ma flatscrollbar, puis avec cette ligne de code, je fais défiler la liste grâce à la Flatscroll :

Private Sub FlatScrollBar1_Change()

ListBox4.TopIndex = FlatScrollBar1.Value

End Sub

Mais j'ai toujours la barre "normale" qui se fout devant (grrrr), et la propriété Zorder n'a pas l'air de vouloir marcher. Est-ce que quelqu'un connaît un moyen d'enlever ou masquer complètement la scrollbar, pour ne voir que la flatscrollbar?

Merci d'avance, @+

Ben
 
B

Ben

Guest
voilà un petit exemple dans lequel j'ai réussi à utiliser correctement Zorder, en fait il faut l'utiliser sur la listbox et non pas sur la flatscroll...le but là va être de trouver pourquoi, même en mettant comme max le nombre de lignes de la listbox, l'évolution de flatscroll ne correspond pas exactement à celle de la list!
 

Pièces jointes

  • flatscrolldemo.xls
    26 KB · Affichages: 71
T

Ti

Guest
Désolé Ben, j'ai bien regardé, mais je ne vois pas l'intérêt de ce FlatScrollbar dans ce cas précis. Il me semble qu'en l'utilisant on se complique beaucoup la vie pour peu de résultat, c'est pourquoi j'ai laissé tomber.
 
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…