Discussion :

[vitalus]

Salut à tous,
je me tourne encore vers vous pour solliciter votre aide. J'ai un USF dans lequel une liste affiche dans une listbox. Je souhaiterais, après avoir sélectionné un élément dans ma listbox que les infos relatives à l'élément sélectionné réapparaissent dans le formulaire de saisi de sorte à apporter une modification et enregistrer.
Malheureusement je ne connais pas le code.
Je joint mon fichier.
Merci de m'aider.

[robich]

voilà un exemple de code code qui peux t'aider :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
Private Sub CommandButton_Click()
Sheets(2).Select
Dim no_ligne As Integer
no_ligne = ComboBox1.ListIndex + 2
If ComboBox1.Value = "" Then
            MsgBox ("Veuillez remplir le champs de recherche, puis réessayer!")
 Else
    TextBox1.Value = Cells(no_ligne, 1).Value
    TextBox2.Value = Cells(no_ligne, 2).Value
    TextBox3.Value = Cells(no_ligne, 3).Value
 
End If
End Sub

[vitalus]

Salut Robich
Merci pour ton code il m'a vraiment aidé.