Discussion :

[gg64480]

Bonjour,

Dans une userform, j'ai plusieurs Listbox qui contiennent chacune une liste de noms. J'aimerais créer une fonction unique qui me retrouve des informations sur ces noms en cliquant dessus. Pour cela j'ai besoin de connaitre le nom de la listbox qui a été "cliquée" et de passer le nom dans ma fonction.

J'espère que c'est assez clair. C'est probablement gros mais malgré avoir chercher dans les forums je n'ai pas trouvé.

Par avance, merci de votre expertise

Bonne soirée

[Philippe Tulliez]

Bonjour,

Pour cela j'ai besoin de connaitre le nom de la listbox qui a été "cliquée" et de passer le nom dans ma fonction.

Sauf si tu utilises un module de classe, je suppose que tu interceptes le clic à partir de la procédure événementielle Click du contrôle ListBox, comme ci-dessous

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
Private Sub lstPerson_Click()
 CurrentRecord = Me.lstPerson.ListIndex + 1
 ReadRecord CurrentRecord
End Sub

Pour obtenir son nom, il suffit d'utiliser la propriété Name du contrôle soit N = Me.lstPerson.NameCependant, au lieu de passer comme argument, le nom de l'objet en chaîne de caractères, tu peux également passer l'objet lui-même

Exemple où oList est une variable objet typée ListBox et donc tu passes comme valeur à l'argument Me.lstPerson

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
Function LoadListBox(oList As MSForms.ListBox, _
                     DataRange As Range, _
                     Optional LookUpValue As String = "", _
                     Optional LookUpField As String) As Variant