[kapetang]

Καλησπέρα

Δίνεται μία ημερομηνία d1 και ένας αριθμός εργάσιμων ημερών w και ζητείται να προσδιοριστεί η ημερομηνία d2, έτσι ώστε στο χρονικό διάστημα [d1, d2] (περιλαμβάνονται και τα άκρα) να έχουμε w εργάσιμες ημέρες.

Τα Σαββατοκύριακα και οι επίσημες γιορτές (αργίες) δε θεωρούνται εργάσιμες μέρες.

Στο συνημμένο δίνω μια λύση με κώδικα (VBA).

Προτίμησα τον κώδικα επειδή τον είχα σχεδόν έτοιμο από παρόμοιο πρόβλημα στην Access, έτσι ήταν εύκολο να τον μεταφέρω στο Excel και να τον προσαρμόσω.

Λόγω του κώδικα απαιτείται:

1) Να είναι ενεργοποιημένες οι μακροεντολές και

2) Να υπάρχει στο παράθυρο κώδικα αναφορά στη βιβλιοθήκη: Microsoft Scripting Runtime

Περισσότερα στο συνημμένο.