Formulaire remplissage de TextBox auto

Bonjour,

Dans mon formulaire, j'aimerais que lorsque je choisi un instrument, le N° d'inventaire ainsi que le N° de série ce mettent automatiquement.

Merci de votre réponse

Bonjour,

Private Sub ComboBox1_Change()
    Dim n%
    n = ComboBox1.ListIndex + 2
    With Worksheets("Stock instruments")
        If n > 1 Then
            TextBox13.Value = .Cells(n, 3).Value
            TextBox14.Value = .Cells(n, 4).Value
        Else
            TextBox13.Value = ""
            TextBox14.Value = ""
        End If
    End With
End Sub

Cordialement.

Merci infiniment MFerrand , ça fonctionne parfaitement.

Rechercher des sujets similaires à "formulaire remplissage textbox auto"