Là où je pêche, c'est que je souhaite remplacer la combobox par un DTPicker, et je ne connais pas la procédure.
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre questionMe.ComboBox.RowSource = "Feuil2!A4:A" & Sheets("Feuil2").Cells(4, 1).End(xlDown).Row Sheets("Feuil2").Activate Range("a4:a368").Select [A4].Offset(ComboBox.ListIndex, 0).Select Me.TextBox = ActiveCell.Offset(0, 1)