OVH Cloud OVH Cloud

Listbox et userform

4 réponses
Avatar
jiistat
Je vous explique mon soucis:

J'ai =E0 faire un formulaire de saisies de donn=E9es sous excel pour
diff=E9rents trajets suivant une ligne de bus donn=E9es, un trajet sur
cette ligne de bus(aller ou retour) et ensuite ma liste d'arret par
trajet

J'ai cr=E9er une listbox avec mes noms de ligne, mais je n'arrive pas =E0
les r=E9cup=E9rer.En les r=E9cuperant, je pourrait uniquement faire
afficher les trajet qui m'interesse.

Comment puis-je r=E9cuperer les =E9l=E9ments s=E9l=E9ctionn=E9s, et comment
puis-je cr=E9er cette liste =E0 option?
Je suis au tout d=E9but de mon programme et ca me bloque

4 réponses

Avatar
jiistat
hic, j'espere que ma requete n'est pas trop incompréhensible ...
Avatar
isabelle
bonjour jiistat,

voici un exemple pour récuperer la sélection de la listbox sur la feuil1 cellule A1

Sheets("Feuil1").Range("A1") = UserForm1.ListBox1.ListIndex

isabelle


Je vous explique mon soucis:

J'ai à faire un formulaire de saisies de données sous excel pour
différents trajets suivant une ligne de bus données, un trajet sur
cette ligne de bus(aller ou retour) et ensuite ma liste d'arret par
trajet

J'ai créer une listbox avec mes noms de ligne, mais je n'arrive pas à
les récupérer.En les récuperant, je pourrait uniquement faire
afficher les trajet qui m'interesse.

Comment puis-je récuperer les éléments séléctionnés, et comment
puis-je créer cette liste à option?
Je suis au tout début de mon programme et ca me bloque



Avatar
jiistat
Merci Isabelle, mais le seul soucis, c'est que çà me retourne un
numéro et en fait mes valeurs se présente sous la forme de '1980
xxx-vvv'
Avatar
isabelle
bonjour jiistat,

si j'ai bien compris, c'est sous un format date,

Sheets("Feuil1").Range("A1") = Format(UserForm1.ListBox1.ListIndex, "yyyy-mm-dd")

isabelle


Merci Isabelle, mais le seul soucis, c'est que çà me retourne un
numéro et en fait mes valeurs se présente sous la forme de '1980
xxx-vvv'