Private Sub List_DblClick(Index As Integer)
With List
frmModif.NumListe = .Index
frmModif.nbelts = .ListCount
frmModif.NumLigne = .ListIndex + 1
frmModif.ch = .List(.ListIndex)
frmModif.Show vbModal
End With
End Sub
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question