Private Sub CommandButton2_Click()
Dim l As Long
If MsgBox("Etes-vous certain de vouloir MODIFIER ce dossier ?", vbYesNo, "Demande de confirmation") = vbNo Then Exit Sub
l = ComboBox1.ListIndex + 2
Cells(l, "K").Resize(, 10) = Array(CDate(TextBox10), TextBox11, TextBox12, TextBox13, TextBox14, TextBox15, TextBox16, TextBox17, TextBox18, TextBox19)
ActiveWorkbook.Save
End Sub