stepsbysteps
XLDnaute Nouveau
Bonjour,
J'aimerai savoir dans une listbox comment savoir avec la souris sur quel élèment il a été cliqué.
Par exemple si l'utilisateur clique sur Ligne 3, je veux récupérer ligne 3 comme argument pour une autre fonction
Merci d'avance
J'aimerai savoir dans une listbox comment savoir avec la souris sur quel élèment il a été cliqué.
Code:
Private Sub UserForm_Initialize()
Dim i As Byte, j As Byte
'Définit le nombre de colonnes dans la ListBox
ListBox1.ColumnCount = 7
'---
'Définit la largeur des colonnes d'une ListBox:
'Par défaut, la largeur des colonnes est de 72 points
'(72 points = 1 pouce)
ListBox1.ColumnWidths = "50;80;50;60;50;70;50"
'---
'Il est aussi possible de définir la dimension des colonnes en centimètres
'ListBox1.ColumnWidths = "2 cm; 1,5 cm ......"
'---
'---
For i = 1 To 20
'Ajoute une ligne et insère une donnée dans la colonne de gauche
ListBox1.AddItem "Ligne" & i
'Ajoute des données dans les colonnes de droite
For j = 1 To 7
ListBox1.List(ListBox1.ListCount - 1, j) = i & j
Next j
Next i
End Sub
Par exemple si l'utilisateur clique sur Ligne 3, je veux récupérer ligne 3 comme argument pour une autre fonction
Merci d'avance