1. Dans sommesicouleur, il faut ajouter cette instruction au début. Je ne l'avais pas mise dans ma version 14 du fichier. Comme expliqué ici dans l'EDIT ici --> https://forum.excel-pratique.com/s/goto/1189767 (Uniquement l'édit et pas le REDIT)
Feuil1.ListObjects(1).ListColumns(4).DataBodyRange.ClearContents
2. Essayez d'ajouter un agent en grève. Avec votre dernier fichier vous allez avoir un plantage. Là il faut ajouter des points devant les CELLS. Allez dans Userform2 --> code Private Sub CommandButton1_Click() --> la ligne concernée dans votre fichier où il faut les ajouter
If CDate(TextBox1.Value) & "/" & Left(ComboBox1.Value, 2) = Mid(Cells(4, i), 1, Len(Cells(4, i)) - 3) & "/" & Left(Cells(3, i), 2) Then MsgBox "Cette date existe déjà", vbInformation, "Erreur Date": Exit Sub
Ne remettez pas de fichier. Je regarde pour le reste
Je vous suggère de ne pas avancer plus loin sans avoir terminé cette partie sans quoi on risque de se perdre tant il y a eu des messages pour arriver à ce stade
Pour compléter le point 1, on doit avoir quoi en F et G
Si D = 0 --> F = E et G = 0
Si D > E --> F = 0 et G = D - E
si D < E --> F = ? et G = ?