Excel Downloads
Forum

Précédent   Excel Downloads Forums > Archives > Forum Excel Downloads - Archives


 
 
LinkBack Outils de la discussion
Vieux 22/05/2003, 16h31   #1 (permalink)
Mickaël
Guest
 
Messages: n/a
Par défaut Selectionner une valeur d'une listbox

Bonjour le forum

Bon alors, une question en amenant une autre.

Alors j'ai des valeurs dans ma listbox1.
Je click sur une valeur, elle se surligne.

Je voudrai que la valeure sur laquelle je click vienne ce placée dans une textbox.

Alors j'ai essayer un truc tout bete.

textbox1 = listbox1

il doit manquer QQchose.

merci pour votre aide.
 
ANNONCES
Vieux 22/05/2003, 16h38   #2 (permalink)
@+Thierry
Guest
 
Messages: n/a
Par défaut Re: Selectionner une valeur d'une listbox

Re Salut Mickaël, le Forum

Tu devrais déjà aller là ===> Il y a une Suprise pour Toi ici !!!

Ensuite pour ta question tu es tout bon, mais c'est l'évènement qui te manque .... Pour le Click, il suffit de faire ceci :

Private Sub Listbox1_Click()
TextBox1 = ListBox1
End Sub

Donc REndez-Vous ===> Ici!!! (lol)

Bon aprèm
@+Thierry
 
Vieux 22/05/2003, 16h48   #3 (permalink)
Mickaël
Guest
 
Messages: n/a
Par défaut Re: Selectionner une valeur d'une listbox

Oui bon c'est bien ce que j'ai fait mais je dois avoir une merde ailleur.
 
Vieux 22/05/2003, 17h19   #4 (permalink)
Laeti
Guest
 
Messages: n/a
Par défaut Re: Selectionner une valeur d'une listbox

peut etre qu avec ca ca marchera :

Private Sub Listbox1_Click()
TextBox1.Value = ListBox1.text
End Sub

j ai eu ce probleme il y a deux jours ...
 
Vieux 22/05/2003, 18h22   #5 (permalink)
@+Thierry
Guest
 
Messages: n/a
Par défaut Re: Selectionner une valeur d'une listbox

Re Mickaël, Laeti, le Forum

Disons que si vos codes sont écrits d'une manière cohérente, il n'est pas nécessaire de spécifier Value car c'est la propriété par défaut de ces deux Controls ActiveX (TextBox et ListBox)

Et donc ceci devrait suffir
Private Sub Listbox1_Click()
TextBox1 = ListBox1
End Sub

Attention pour
TextBox1 = ListBox1.Text
Car la propriété Text dans une ListBox ou ComboBox est plutot utilisé pour changer the selected row avec un Matching. Mais dans le cas présent qui nous interesse celà peut fonctionner avec Text.

Ensuite
Il est possible que ton problème provienne d'une sorte de "croisement d'évènements"...
Par exemple tu as dois faire attention aux évènements qui s'enchainent...

Private Sub ListBox1_AfterUpdate()
TextBox1 = "Toto"
End Sub
Private Sub Listbox1_Click()
TextBox1 = ListBox1
End Sub
Private Sub ListBox1_Change()
TextBox1 = ""
End Sub
Private Sub ListBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean)
TextBox1.Text = "Titi"
End Sub

Et ben que va-t'il y avoir dans la TextBox1.... Hi hi hi ... (Mdrrr) Je suis vache là !!!

Bon enfin j'ai mis ce qu'il fallait dans la Démo ci-jointe... Et çà fonctionne sur le Click des ListBox Respectives... Quoique à ce stade je ne vois pas encore l'utilité de faire reporter dans des TextBox la Sélection de ListBox...

Bon Fin de Journée
@+Thierry
Fichiers attachés
Type de fichier : zip USF-AutoFilter-Collection.01.00.zip (17,2 Ko, 25 affichages)
 
ANNONCES
 

Liens sociaux

Outils de la discussion

Règles de messages
Vous ne pouvez pas créer de nouvelles discussions
Vous ne pouvez pas envoyer des réponses
Vous ne pouvez pas envoyer des pièces jointes
Vous ne pouvez pas modifier vos messages

Les balises BB sont activées : oui
Les smileys sont activés : oui
La balise [IMG] est activée : oui
Le code HTML peut être employé : non
Trackbacks are oui
Pingbacks are oui
Refbacks are oui


Fuseau horaire GMT +2. Il est actuellement 01h39.


(C) 2006 Excel Downloads