[Spirosgr]

Καλημέρα
Στο βιβλίο που ακολουθεί υπάρχουν τα εξής:

Με κώδικα στο βιβλίο κατά το άνοιγμα
1. Ενεργοποιείται πάντα και ανοίγει το φύλλο Sheet1
2. Χρωματίζονται κόκκινο οι ημερομηνίες ΣΗΜΕΡΑ +1
δηλ. έχουμε ειδοποίηση μια μέρα πριν τη λήξη.

Με κώδικα στο βιβλίο στο κλείσιμο
Αποχρωματίζονται όλα τα κελιά της περιοχής ημερομηνιών λήξης.

Προσοχή:
Επειδή οι ανάγκες του καθ' ενός διαφέρουν
Υπάρχουν δύο ρουτίνες με τίτλο Workbook_Open
Αυτή που είναι απενεργοποιημένη κάνει και τις δύο δουλειές μαζί.
Πρώτα αποχρωματίζει τα ήδη χρωματισμένα κελιά και μετά χρωματίζει εκ' νέου αν υπάρχουν ημερομηνίες για κατάδειξη.
Αν θέλετε να χρησιμοποιήσετε αυτόν τον κώδικα ενεργοποιήστε τον ΑΛΛΑ πρέπει να απενεργοποιήσετε τον άλλο.
Με τον τρόπο αυτό ΔΕΝ θα χρειαστεί και ο κώδικας Workbook_BeforeClose
οπότε πρέπει να τον απενεργοποιήσετε και αυτόν.

Αναλόγως με τις ανάγκες σας μπορείτε να βάλετε τους κώδικες και στα σημεία:
χωρίς την γραμμή Sheet1.Activate
Worksheet_Activate στην ενεργοποίηση του φύλλου.
Worksheet_Deactivate στην απενεργοποίηση του φύλλου.

και στο βιβλίο
Workbook_BeforeSave πριν την αποθήκευση.

Μπορείτε να αλλάζεται και την ειδοποίηση στο κελί D1 (κίτρινο)

Φίλε ΘΑΝΑΣΗ
Βάλε τον τύπο σου σε μια διπλανή στήλη στο βιβλίο
Εκεί που είναι κόκκινα θα έπρεπε να αποδόσει TRUE