Bonsoir fabguilb, le forum,
Il faut préciser sur quelle feuille effectuer la recherche, sinon c'est la feuille active par défaut (donc sommaire).
Private Sub ToggleButton2_Click()
'Double click sur le bouton Rechercher'
If Not ComboBox1.Value = "" Then
Dim no_ligne As Integer
With Sheets("Clients")
no_ligne = ComboBox1.ListIndex + 2
ComboBox1.Value = .Cells(no_ligne, 1).Value
TextBox11.Value = .Cells(no_ligne, 2).Value
TextBox12.Value = .Cells(no_ligne, 3).Value
TextBox13.Value = .Cells(no_ligne, 4).Value
TextBox14.Value = .Cells(no_ligne, 5).Value
TextBox15.Value = .Cells(no_ligne, 6).Value
TextBox16.Value = .Cells(no_ligne, 7).Value
TextBox17.Value = .Cells(no_ligne, 8).Value
TextBox18.Value = .Cells(no_ligne, 9).Value
TextBox20.Value = .Cells(no_ligne, 10).Value
End With
End If
End Sub
Bonne soirée,