Microsoft 365 parametrer les MFS de facon a changer de couleur par intervalle, verifier aussi le script du macro qui ne s'affiche pas a l'ouverture du document

doerma

XLDnaute Nouveau
Bonjour a toute la plate forme,
Je suis confronte a un probleme et j'ai besoin de votre aide
En effet, pour le document ci-joint, J'aimerais pour la colone G nommee "delai"
- mettre en gris apres le delai depasse (quand la date passe);
- mettre en rouge les dates comprises entre le delai et 7 jours
- mettre en orange les dates comprises entre 8 et 30 jours
-mettre en vert les dates preevues pour plus de 30 jours avant le delai

Priere de bien vouloir encore m'aider et de jeter aussi un coup d'oeil dans le macro pour voir qui empeche l'affichage a l'ouverture.
Merci, cordialement Doerma
 

Pièces jointes

  • PDCA excel.xlsm
    34.2 KB · Affichages: 7

Jacky67

XLDnaute Barbatruc
Bonjour a toute la plate forme,
Je suis confronte a un probleme et j'ai besoin de votre aide
En effet, pour le document ci-joint, J'aimerais pour la colone G nommee "delai"
- mettre en gris apres le delai depasse (quand la date passe);
- mettre en rouge les dates comprises entre le delai et 7 jours
- mettre en orange les dates comprises entre 8 et 30 jours
-mettre en vert les dates preevues pour plus de 30 jours avant le delai

Priere de bien vouloir encore m'aider et de jeter aussi un coup d'oeil dans le macro pour voir qui empeche l'affichage a l'ouverture.
Merci, cordialement Doerma
Bonjour,
Pour le problème d'ouverture
VB:
Private Sub Workbook_Open()
Dim n&, ligne&
With Sheets("tableau de bord")
'derniere ligne de la colonne G
ligne = .Columns(7).Find("*", , , , xlByColumns, xlPrevious).Row
For n = 2 To ligne
'boucle sur les date si la diff?rence entre aujourdhui et la date est inferieure ? 6 alert passe ? 1
If CDate(Range("G" & n)) - Date < 8 Then MsgBox "Les délais doivent être vérifiés pour ne pas être oubliés.", vbCritical: Exit Sub
Next
End With
End Sub

Pour les MFC
Rouge + ou -7 jours
idem pour orange
Il y a déjà un exemple pour le vert, pourquoi ne pas continuer ?
 

Statistiques des forums

Discussions
311 724
Messages
2 081 936
Membres
101 844
dernier inscrit
pktla