Merci de vos réponses.
Merci pour les stocks BrunoM45, ça marche super.
Mais maintenant mon soucis c'est que logiquement le "4" qu'il y a ici :
Private Sub ComboBox1_Change()
If ComboBox1.ListIndex = -1 Then
Efface
Exit Sub
End If
TextBox1 = Tablo(ComboBox1.ListIndex + 1, 4)
End Sub
Je devrais normalement juste le remplacer par un "2" pour employé et un "3" pour Chantier mais ça ne marche pas, mes menus déroulants restent vides. ll faut que je crée quelque chose avant non?
Et oui Robajm, je suis désolé, j'avais oublié que j'avais protéger les feuilles. Maintenant c'est bon, et au cas où il faudrait le mot de pass, le voilà : "CELTIC" (en majuscule).
Merci du temps que vous consacrez à m'aider.