listbox valeur

[pasmermayvir]

Bonjour à Tous
Je n'arrive pas à "transmettre" la valeur du ListBox1 sur la feuille "Résultats".
Cells(nl, 4) = ListBox1.Value ne marche pas....
Je vous remercie par avance pour votre aide

 

[Cousinhub]

Re : listbox valeur

Bonjour,

essaie avec :

Cells(nl, 4) = Me.ListBox1.List

 

[pasmermayvir]

Re : listbox valeur

Je te remercie
Cela marche bien..... J'avais essayé le .List mais sans mettre de Me.
A plus

 

[kjin]

Re : listbox valeur

Bonjour,
Il me semble, que le "Me" n'a rien à avoir avec ton problème (la Listbox est sur ton formulaire et pas ailleurs), si j'ai tout bien compris.
Soit, tu sélectionnes la valeur dans ta Listbox pour renvoyer cette valeur avant de valider et tu utilises "Listbox1.Value", soit tu renvoies la valeur sélectionnée dans une Textbox supplémentaire, soit tu remplaces ta lisbox par une combobox.
A+
kjin

 

[papapaul]

Re : listbox valeur

🙂 Salut Pasmer, bh², BrunoM45
Pourquoi créer un nouveau fil ? Que veux tu exactement ?

Faire une recherche dans ta bdd et en fonction du résultat sur l'USF,
avoir un bouton qui ajoute ou non une ligne dans une autre feuille ?

Veux tu par exemple chercher dans ta base tous les codes
qui commencent par 75 et créer une feuille 75 pour y copier les résultats ?


L'idée de Bruno ( Amitiés 😉 ) avec les "Functions"
VSearch, vbTextCompare) > 0 Then FlgTrouve
C'est plus que pratique.

J'ai quelques idées (exemples grace au forum) mais
faudrait que tu soit plus précis.

Je surveille c'taffaire😀

Vive XLD

 

[Bebere]

Re : listbox valeur

bonjour pasmermayvir,papapaul,kjn,bhbh
si tu veux remplir la feuille résultats,le code est fait
listbox1.list est tout le contenu de la listbox
Me fait référence à userform1(à n'employer que dans la feuille de code de l'userform1)
à bientôt

 

[Cousinhub]

Re : listbox valeur

Re-,

Salut bebere

Oupss, pas bien réveillé, moi ce matin......