Sub Feuil1_Bouton12_Cliquer()
Dim i As Integer
i = 11
UserForm2.Show
Do While Feuil1.Cells(i, 14) <> Feuil1.ComboBox1.Text
i = i + 1
Loop
TextBox1.Text = Feuil1.Cells(i, 3) Avec l'erreur 424 à cet endroit.
TextBox2.Text = Feuil1.Cells(i, 4)
TextBox3.Text = Feuil1.Cells(i, 5)
TextBox4.Text = Feuil1.Cells(i, 6)
TextBox5.Text = Feuil1.Cells(i, 7)
TextBox6.Text = Feuil1.Cells(i, 8)
TextBox7.Text = Feuil1.Cells(i, 9)
TextBox11.Text = Feuil1.Cells(i, 10)
TextBox8.Text = Feuil1.Cells(i, 11)
TextBox8.Text = Feuil1.Cells(i, 12)
TextBox9.Text = Feuil1.Cells(i, 13)
TextBox10.Text = Feuil1.Cells(i, 14)
End Sub