Quelle contrôle??

[roro69]

Bonsoir
Voici mon petit souci:
Dans mon usf j'ai une liste box ,je souhaiterais mettre un controle pour passer d'une selection à une autre.
J'ai essayé avec le controle toupie mais je bloque un peu.
Je vous remerci d'avance pour vos réponses.

 

[Roland_M]

Re : Quelle contrôle??

bonsoir
sans classeur joint c'est impossible de deviner !
nous ne sommes pas des devins !

Roland

 

[pascal21]

Re : Quelle contrôle??

bonsoir
ce que j'ai compris
tu veux un autre contrôle pour avoir le choix de la liste dans la listbox
dans ce cas un faut regarder dans les archives et chercher listbox cascades
sinon je ne vois pas
si c'est ce que tu veux je dois avoir encore un classeur exemple qui traine dans le pc

 

[roro69]

Re : Quelle contrôle??

Re et merci pour vos réponses ;
ce que je cherche en fait c'est faire défiler la sélection dans la meme listbox .;passer d'un enregistrement à un autre monter ou desendre.
Merci

 

[pascal21]

Re : Quelle contrôle??

passer d'un enregistrement à un autre monter ou desendre.

alors là rien compris sur ce coup là
c'est quoi que tu veux
mettre ta liste dans ta listbox?
si c'est ça il faut sélectionner ta liste de données et la nommer "insertion/nom/definir"
ensuite dans propriètés de la listbox tu écris le nom choisi dans la ligne "listfillrange"

 

[roro69]

Re : Quelle contrôle??

Re
Je crois que je m'exprime très mal .
Voilà j'ai dans mon Usf une listbox avec des ingrédients ; ce que je souhaiterais ; c'est insèrer un bouton qui me permette de parcourir ma listbox .Par exemple avec le controle toupie ou scrollbar je pourrais parcourir ma listbox en montant ou en descendant.; donc pour résumer passer d'un ingrédient à un autre sans passer par la listbox mais que par bouton.

 

[Cousinhub]

Re : Quelle contrôle??

Bonsoir,
regarde le fichier joint :

le code :

Private Sub SpinButton1_SpinUp()
With Me.ListBox1
    If .ListIndex = 0 Then Exit Sub
    .ListIndex = .ListIndex - 1
End With
End Sub

Private Sub SpinButton1_SpinDown()
With Me.ListBox1
    If .ListIndex = .ListCount - 1 Then Exit Sub
    .ListIndex = .ListIndex + 1
End With
End Sub

Private Sub UserForm_Initialize()
Me.ListBox1.ListIndex = 0
End Sub

 

[roro69]

Re : Quelle contrôle??

Bonsoir bhbh;
Super exactement ce que je cherchais ; je ne sais pas ou tu as trouver le décodeur pour savoir ce que je voulais(lol) ; je te remerci beaucoup et j'en profite de remercier Pascal ; pour avoir essayé mais sans le bon décodeur; .Enfin encore un leçon si on veut les bonne réponses ; il faut les bons énnoncé;et là ce n'était vraiment pas le cas........
Allez encore merci à bhbh et à pascal
Bonne soirée à vous