Bonjour je veux créer un formulaire grâce à un code trouvé dans l'Ordinateur individuel mais j'ai un message d'erreur que je comprends pas.
Merci infniment de votre aide.
Sub Saisie()
Range("A2").Select: Selection.End(xlDown).Select
ActiveCell.Offset(1, 0).Range("A1").Select
With FrmFormulaire
'.....alimentation liste des régions
'.....alimentation de la liste des spécialités
.LstSpecialite.Addltem "Avions"
.LstSpecialite.Addltem "Bateaux"
.LstSpecialite.Addltem "Trains"
.LstSpecialite.Addltem "Voitures"
.Show
End With
End Sub