Comment vérifier qu'une ligne est sélectionnée dans une listbox??

[zeltron]

Bonjour à tout le forum

Voici mon problème.

Sur un USF, j'ai une listbox ( ListBox1)
Dans une macro appliquée à un bouton, j'utilise entre autre la ligne qui est sélectionnée dans la listbox1:
ex :TextBox1.Value = ListBox1.List(ListBox1.ListIndex, 0)

Cependant quand je n'ai pas de ligne sélectionnée dans ma listbox, cela ne fonctionne pas évidemment.

C'est pourquoi j'aimerais savoir comment je peux vérifier qu'une ligne est bien sélectionnée dans ma listbox, pour pouvoir mettre une condition du type:

If "pas de ligne sélectionnée dans listbox1" then
exit sub
else
TextBox1.Value = ListBox1.List(ListBox1.ListIndex, 0)
end if

J'espère que vous pourrez m'aider.

Merci d'avance

Zeltron

 

[Catrice]

Re : Comment vérifier qu'une ligne est sélectionnée dans une listbox??

Bonjour,

Voir un exemple dans le fichier joint.
Je ne pense pas qu'il soit necessaire de tester si une ligne est selectionnée ou non.
ListBox1.Value devrait suffire

 

[zeltron]

Re : Comment vérifier qu'une ligne est sélectionnée dans une listbox??

Merci Catrice de te pencher sur mon problème

Au vu de ta réponse, je m'aperçois que j'ai très mal poser mon problème, mon exemple est très mauvais, je pensais que mon exemple simplifié pouvais permettre d'être clair mais en fait il brouille + qu'il n'aide; oubliez le!! Et excusez moi .

Donc de manière détaillée, mon problème est le suivant:

J'ai 2 listbox: ListBox A et listboxB
J'ai une textbox: Textbox1

La Macro se déclenche par un click sur la listboxB

Cette macro permet de mettre dans la textbox1 la ligne sélectionnée dans la ListboxB et la ligne dans la listbox A. de cette manière:
textbox1.value =ListBoxB.List(ListBoxB.ListIndex, 0) & " " & ListBoxA.List(ListBoxA.ListIndex, 0)

Donc ce que devrait faire l'utilisateur c'est :
1-Cliquer sur la listBoxA pour y sélectionner une ligne
2-Puis Cliquer sur la ListBox B pour y sélectionner également une ligne.

Et c'est cette sélection dans la listrBoxB qui déclenche la macro pour aller "nourrir" la textbox1:

Sub ListBoxB_Click()
textbox1.value =ListBoxB.List(ListBoxB.ListIndex, 0) & " " & ListBoxA.List(ListBoxA.ListIndex, 0)
...
End Sub

La macro ne se déclenche donc qu'après une sélection sur la listBoxB

Cependant, si l'utilisateur clique directement sur la listBoxB et n'a pas auparavant sélectionner de ligne dans la listBoxA, aucune ligne n'y sera sélectionnée et la macro ne fonctionnera pas.

C'est pourquoi j'ai réellement besoin de tester si une ligne est bien sélectionnée sur la ListBoxA.

Avez-vous une idée?

Merci d'avance pour votre aide.

Cordialement

Zeltron

 

[mutzik]

Re : Comment vérifier qu'une ligne est sélectionnée dans une listbox??

Bonjour,

je ferai,
-un code sur ta listbox 1 qui, quand une ligne est selectionnée, va 'enabler' ta list box 2, dans laquelle on choisira la 2eme ligne
-ensuite on ecrit les deux lignes dans textbox1, puis
-tu remets tes listbox en 'aucune selection de ligne'
-tu disable à nouveau ta listbox2 pour obliger l'utilisateur à selectionner en premier une valeur dans la LB A

 

[zeltron]

Re : Comment vérifier qu'une ligne est sélectionnée dans une listbox??

Je n'avais pas pensé à cette solution,

J'essaie de suite et te tiens au courant

Merci encore

Zeltron

 

[Catrice]

Re : Comment vérifier qu'une ligne est sélectionnée dans une listbox??

Re,

Une interpretation ci-joint.
On écrit dans TextBox1 dès la selection dans List1 (si jamais l'utilisateur change d'avis)

 

[zeltron]

Re : Comment vérifier qu'une ligne est sélectionnée dans une listbox??

Merci Catrice, ta solution fonctionne impec!!

Merci encore

Cordialement

Zeltron