Bonjour,

Me revoilà avec une nouvelle question : j'ai une listbox et 2 textbox. Quand je clique sur ma listbox (listbox1), j'aimerai que mes textbox affichent les données associées à la sélection. Je l'ai fait dans un autre usf mais là ça ne marche pas. En fait je me suis aperçu que la méthode n'était pas activée lorsque je clique sur la listbox... Je ne comprends pas du tout pourquoi!

Voila le code de mon usf avec l'initialisation et la méthode listbox1_click() :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
Private Sub ListBox1_Click()
    If Me.ListBox1.ListIndex < 0 Then
        msgbox "Aucun poste n'est sélectionné", vbOKOnly + vbInformation
        Exit Sub
    End If
 
    etimepTB.Value = Range("Postes").Cells(Me.ListBox1.ListIndex + 1, 3)
    stimepTB.Value = Range("Postes").Cells(Me.ListBox1.ListIndex + 1, 2)
End Sub
 
Private Sub userform_initialize()
    If Application.WorksheetFunction.CountA(Range("Postes_Postes")) = 0 Then
        msgbox "Aucun poste n'a été ajouté"
        Exit Sub
    End If
    ListBox1.List() = Range("Postes_Postes").Value
End Sub
Auriez vous une idée?

Merci d'avance

Thomas