Bonjour Petchy
Pas de problème, il suffit modifie le code du bouton Validation
Remplace le par celui si;
Private Sub ValidationButtonGen_click()
LineWO = ActiveCell.Column
Cells(5, LineWO) = Format(TextBoxDate, "dd-mmm-yyyy")
Cells(6, LineWO) = Format(TextBoxTime, "hh:mm:ss")
Cells(7, LineWO) = ComboBoxOPS.Value
Cells(8, LineWO) = ChoixVar
Cells(9, LineWO) = ChoixAVar
new_event
UserForm1.Hide
Unload UserForm1
End Sub
@Christophe@