Re : Coder mon UserForm (Glups)
Dans le code suivant, rajouter la ligne en gras :
Private Sub ComboBox1_Change()
lig = ComboBox1.ListIndex + 12
'Stop
With Sheets("Base_Clients")
TextBox1 = .Cells(lig, 1)
TextBox3 = .Cells(lig, 3)
TextBox4 = .Cells(lig, 4)
TextBox5 = .Cells(lig, 5)
TextBox7 = .Cells(lig, 7)
TextBox8 = .Cells(lig, 9)
TextBox9 = .Cells(lig, 10)
TextBox1 = .Cells(lig, 11)
TextBox6 = .Cells(lig, 6)
TextBox10 = .Cells(lig, 12)
End With
End Sub