Planning de livraisons interactif avec demandes

Bonjour

Lorsque j'essaye d'intégrer les demandes, le message au sujet du créneau occupé par l'entreprise s'affiche sans cesse. Est-il possible de ne le faire s'afficher qu'une seule fois?

Actuellement le message s'affiche à chaque fois que le code voit un souci dans une des lignes. On peut évidemment ne l'afficher qu'une seule fois.
Mais avant de lancer le code Planning vous devez le vider en premier.
Si vous videz le planning dans votre dernier fichier je ne vois pas de souci avec ce message

Faudrait-il que je crée une macro qui remet le format texte en noir lorsque l'on vide le planning? Car la mise en forme persiste

Oui exact. Le mieux est de vider la feuille planning avant de relancer le code planning.
Faites ceci :

- Ajoutez ce code

Sub vider_planning()
Dim lig As Byte, col As Byte

With Feuil2
    lig = Feuil2.Range("A" & Rows.Count).End(xlUp).Row
    col = Feuil2.Cells(1, Columns.Count).End(xlToLeft).Column
    With .Range(.Cells(2, 2), .Cells(lig, col))
        .ClearContents
        .Font.ColorIndex = xlAutomatic
    End With
End With
End Sub

- dans la macro Planning, au début ajoutez cette ligne

Call vider_planning

Si c'est la feuille demande de livraisons que vous voulez vider. Utilisez ce code

Sub vider_demande_livraison()
Feuil1.Range("Tab_demande_livraison").ListObject.DataBodyRange.Delete
End Sub