L’évènement Double clic sur une ListBox

Salut tout le monde,

Je Vien pour vous afin de trouver une solution à mon problèmes,

J’ai deux UserForm

Un « UserForm_Modif » dépend de l’autre « Consultation ».

Alors j’ai une base de donner des agents avec des matricules unique.

Une fois lancer « UserForm Consultation » si en taper un matricule sur « TextBox_matricule » en peut afficher tous les consultation de cet agent sur la « ListBox_MedTrav ».

Ma question si comment faire pour afficher une consultation donner à partir de la « ListBox_MedTrav » avec l’évènement Double clic « DblClick » sur le deuxieme UserForm « UserForm_Modif ».

Voir le fichier joint.

Merci à vous d’avance.

57double-clic-1.xlsm (41.59 Ko)

aidez moi SVP

Bonjour, j'ai trouvé une solution sur un autre Forum je la partage avec vous:

dans un module standard

Option Explicit

Public TbListbox(), x As Integer

dans l'évènement "DblClick" de l'usf

Private Sub ListBox_MedTrav_DblClick(ByVal Cancel As MSForms.ReturnBoolean)
ReDim TbListbox(1 To ListBox_MedTrav.ColumnCount)
For x = 1 To ListBox_MedTrav.ColumnCount
  TbListbox(x) = ListBox_MedTrav.Column(x - 1)
Next x
UserForm_Modif.Show
End Sub

et dans l'autre Usf (évènement Activate)

[/Private Sub UserForm_Activate()
TextBox_Bilan_Sanguin = TbListbox(1)
TextBox_Consultation = TbListbox(2)
TextBox_CAT = TbListbox(3)
TextBox_Radiologie = TbListbox(4)

End Sub

un grand merci a casefayere;

j'ai une question:

comment faire après pour extraire le numéro de la ligne a fin de faire une modification.

131double-clic-2.xlsm (40.37 Ko)
Rechercher des sujets similaires à "evenement double clic listbox"