[Συναρτήσεις] Προγραμματισμός Εργάσιμων Ημερών

[ggreg75]

Καλημέρα σε όλη την ομάδα,

Θα ήθελα την βοήθειά σας σύμφωνα με το συνημμένο αρχείο.

Πως θα μπορούσαν οι στήλες K έως GH να λαμβάνουν τις τιμές των εργάσιμων ημερών όπου στην στήλη K να μπαίνει η τρέχουσα ημερομηνία και στις επόμενες μόνο οι επόμενες εργάσιμες.

Υπόψιν ως αργία θεωρείται και το Σάββατο και φυσικά άλλες οι σταθερές και κινητές αργίες.

Αναμένω την βοήθειά σας και σας ευχαριστώ εκ των προτέρων

Γρηγόρης

[ChrisGT7]

Καλημέρα Γρηγόρη,

Δοκίμασε το συνημμένο αρχείο αν σε βολεύει.

Πληκτρολογώντας μια ημερομηνία στο κελί Κ1, στα κελιά L1:GH1 συμπληρώνονται αυτόματα οι εργάσιμες ημέρες που ακολουθούν την ημερομηνία του Κ1.

Εργάσιμες ημέρες θεωρούνται οι ημερομηνίες εκτός των Σαββατοκύριακων και των επίσημων αργιών.

Οι επίσημες αργίες υπολογίζονται στο φύλλο ΑΡΓΙΕΣ, αφού πρώτα συμπληρώσεις το Κ1.

[ggreg75]

Χρήστο καλησπέρα,

Καταρχάν σε ευχαριστώ για την βοήθειά σου

Σύμφωνα με αυτά που ζήτησα είναι ακριβώς αυτό που χρειαζόμουν.

Όμως υπάρχει το εξής θέμα και θα ήθελα την βοήθειά σου.

Εάν η τρέχουσα ημέρα είναι αργία θα μπορούσε να εξαιρείται από το κελί Κ2 και να αντικατασταθεί με την αμέσως επόμενη εργάσιμη;
Αντίστοιχα, τα επόμενα κελιά να διαμορφωθούν με αυτή την λογική.

Ευχαριστώ πολύ εκ των προτέρων

Γρηγόρης

[ChrisGT7]

Καλημέρα Γρηγόρη,

Δοκίμασε τώρα το συνημμένο αρχείο.

Πληκτρολογώντας μια ημερομηνία στο Κ1 και είναι Σάββατο, Κυριακή ή επίσημη αργία, τότε η ημερομηνία διορθώνεται αυτόματα με την επόμενη εργάσιμη ημέρα και τα υπόλοιπα κελιά βασίζονται πάνω σ' αυτήν.

[Spirosgr]

Καλημέρα
Μπορείτε να χρησιμοποιήσετε την συνάρτηση =WORKDAY.INTL(K1;1;1;Holidays)
στο κελί L1, και τραβάμε δεξιά.

Ορίσματα
Startdate = (Κ1) = το κελί με την =today()
Days = 1 = το κάθε προηγούμενο κελί
Weekend = 1 = ΣΚ για Ελλάδα
Holidays = η ονομασμένη περιοχή Holidays*

*Η περιοχή αυτή θα πρέπει να έχει, τόσες «ντάνες» αργιών,
όσα και τα εν δυνάμει έτη, που περιλαμβάνονται στις στήλες δεξιά από την Κ.

Περισσότερα στο βιβλίο...

[ggreg75]

Χρήστο καλημέρα,

Αυτό που χρειάζομαι είναι, μην πληκτρολογώ κάτι στο κελί Κ1 αλλά, με το που ανοίγει το αρχείο να τρέχει ο κώδικας και να συμπληρώνει τα κελιά K1-GH1 αυτόματα ως εξής :

K1 : Την τρέχουσα ημέρα. Εάν είναι αργία την αμέσως επόμενη εργάσιμη
L1 - GH1 : Τις επόμενες εργάσιμες

Ευχαριστώ

Γρηγόρης

[ChrisGT7]

Δοκίμασε το επισυναπτόμενο αρχείο, το οποίο βασίζεται στη συνάρτηση που πρότεινε ο Σπύρος για αποφυγή κώδικα VBA.

Επεξεργασία:
Γρηγόρη, στο κελί Κ1 γράψε την παρακάτω συνάρτηση:
=IF(AND(WEEKDAY(TODAY();2)<6;ISERROR(MATCH(TODAY() ;Holidays;0)));TODAY();WORKDAY.INTL(TODAY();1;1;Ho lidays))

[ggreg75]

Χρήστο καλησπέρα,

Δοκίμασα τα παραπάνω σύμφωνα με το τελευταίο αρχείο που ανέβασες όμως μου βγάζει σφάλμα.

Μπορείς να το δεις;

Ευχαριστώ και πάλι όλους σας

Γρηγόρης

[ChrisGT7]

Αν καταλαβαίνω καλά, το πρόβλημα πρέπει να είναι στις εκδόσεις 2003 και 2007 που χρησιμοποιείς. Η συνάρτηση WORKDAY.INTL λειτουργεί στο Excel 2010 και μετά.

Δοκίμασε το συνημμένο αρχείο με κώδικα.

[ggreg75]

Καλησπέρα,

Σωστά. Τώρα είναι εντάξει.

Ευχαριστώ πολύ Χρήστο

Γρηγόρης