Καλησπέρα

Δεν καταλαβαίνω το πρόβλημα.

Γράφεις «Το πρόβλημα όπως μπορεί να παρατηρήσει κανείς είναι ότι στο φύλλο "Διαστήματα" όπου υπάρχουν περισσότερα διαστήματα αδειών πχ στον μήνα Οκτώβριο καλύπτονται 42 στήλες ακριβώς σε αντίθεση με το φύλλο "Διαστήματα (2)", όπου στον αντίστοιχο μήνα τα διαστήματα είναι μικρότερα.».

Στο αρχείο που ανέβασες «ExampleAdeies5.xlsm», με βάση το οποίο διαμόρφωσα τον κώδικα, υπάρχουν μόνο δύο φύλλα τα «Καταχώρηση» και «Διαστήματα».

Στο «Καταχώρηση» καταχωρούνται οι απουσίες κάθε μέρα. Το πλήθος των στηλών κάθε μήνα εξαρτάται από τη διάρκειά του (28 έως 31) και συνεπώς δεν είναι σταθερό.

Στο φύλλο «Διαστήματα» γίνεται η εξαγωγή των διαστημάτων.
Στο παράδειγμά σου για το μήνα Οκτώβριο χρησιμοποιούνται 17 στήλες και για το Νοέμβριο 19.

Οι 42 στήλες που αναφέρεις δεν ξέρω από πού προέκυψαν. Επίσης δεν ξέρω πως προέκυψαν τα στοιχεία του φύλλου Διαστήμα(2) του νέου αρχείου που ανέβασες.

Ο κώδικας λαμβάνει υπόψη τα δεδομένα από το φύλλο «Καταχώρηση» και για κάθε μήνα χρησιμοποιεί, στο φύλλο «Διαστήματα», τις αναγκαίες στήλες.

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

Φιλικά/Γιώργος

Γιώργο γεια και πάλι,

Ζητώ συγνώμη αν δεν έγινα κατανοητός.:blushing:

Το φύλλο "Διαστήματα (2)" είναι μια αντιγραφή του φύλλου "Διαστήματα" (έχοντας τρέξει τον κώδικα) με διαφορετικές ημερομηνίες αδειών απλά για να περιγράψω το πως καταγράφονται διαφορετικά εύρη διαστημάτων των απουσιών...
Το λάθος είναι δικό μου που δεν εξήγησα την παραδειγματική δημιουργία του τρίτου φύλλου.

Οι 42 στήλες ανά μήνα προκύπτουν από 3 στήλες (Έναρξη/Λήξη/Σύνολο) επί 14...Κατέληξα σε αυτό τον αριθμό υπολογίζοντας ένα ακραίο σενάριο αδειών βάσει του οποίου χρειάζονται 14 τουλάχιστον διαστήματα (όπως πχ τον μήνα Οκτώβριο).

Οπότε αυτό που θέλω είναι αν φυσικά εφικτό να ορίζονται τα αποτελέσματα των διαστημάτων σε συγκεκριμένες στήλες στο δεύτερο φύλλο, όπου κάθε μήνας θα αντιστοιχεί μέσα σε ένα ορισμένο πάντα πλαίσιο στηλών (42).

Αν πιστεύεις ότι ο συλλογισμός μου είναι λάθος, εννοείται κάθε παρατήρηση και συμβουλή είναι πάντα δεκτή.

1) Αν ήθελες 42 στήλες σταθερά θα έπρεπε να το διευκρινίσεις, Στο παράδειγμα που ανέβασες ήταν 17 και 19.

2) Γιατί να είναι σταθερά 42 στήλες, αφού στους περισσότερους μήνες χρειάζονται λιγότερες.

3) Υπάρχουν και πιο ακραία σενάρια. Δοκίμασε μια εναλλαγή ΚΑ και ΑΣ.

Καλημέρα

Μάνο, κάνοντας κάποιες δοκιμές με εναλλαγή ΚΑ και ΑΣ, διαπίστωσα ότι υπήρχαν περιπτώσεις που τα αποτελέσματα δεν ήταν σωστά.

Ελέγχοντας τον κώδικα διαπίστωσα ότι υπήρχε κάποιο λάθος.

Στο επισυναπτόμενο αρχείο το διόρθωσα.

Αντικατέστησα επίσης τα συνημμένα αρχεία και στα προηγούμενα μηνύματά μου

Φιλικά/Γιώργος

Καλημέρα Γιώργο,

Ευχαριστώ πολύ για την βοήθεια σου...:worthy:
Το τελευταίο αρχείο ομολογώ ότι με "ξεκόλλησε"!

Καλησπέρα

Στο προηγούμενο αρχείο AdeiesPerDayToIntervals2.xlsm τα διαστήματα απουσίας λόγω κανονικής άδειας (ΚΑ) και ασθένειας (ΑΣ) θεωρούνται διαφορετικά.

Στο συνημμένο αρχείο AdeiesPerDayToIntervals3 δίνεται και η δυνατότητα να μη γίνεται η παραπάνω διάκριση.

Έτσι συνεχόμενα διαστήματα απουσίας, ανεξάρτητα από το λόγο απουσίας, συνενώνονται σε ένα.

Φιλικά/Γιώργος

Γιώργο καλησπέρα,

Πραγματικά κάθε βοήθεια και προσθήκη σου αναβαθμίζει το παράδειγμα.

Θα ήθελα να ρωτήσω το εξής:
Υπάρχει δυνατότητα τα αποτελέσματα στο φύλλο "Διαστήματα" να μην εμφανίζονται συνεχόμενα;

Δλδ κάθε μήνας ξεχωριστά να βρίσκεται σε διαφορετικό εύρος κελιών (πχ Οκτώβριος Α1:Ρ5, Νοέμβριος Α20:Μ24 στην εντολή του "Υπολογισμού διαστημάτων απουσίας χωρίς διάκριση ΚΑ, ΑΣ") και να επαναλαμβάνονται φυσικά οι σταθερές στήλες των υπαλλήλων (ΥΠΑΛΛΗΛΟΣ Α, ΥΠΑΛΛΗΛΟΣ Β κλπ);

Εν ολίγοις το ερώτημα αφορά κατά πόσο στον κώδικα είναι εφικτό να οριστούν διαφορετικά διαστήματα όπου θα αποτυπώνονται τα αποτελέσματα του κάθε μήνα ή το range των αποτελεσμάτων είναι αποκλειστικά συνεχόμενο.

Ευχαριστώ προκαταβολικά:011:

Καλησπέρα και Καλημέρα

Υπάρχει αυτή η δυνατότητα.

Στον κώδικα η θέση των αποτελεσμάτων κάθε μήνα καθορίζεται από τη μεταβλητή rngOutMonth.

Αν θεωρείς σημαντικό, για μένα δεν είναι, να μη εμφανίζονται συνεχόμενα τα αποτελέσματα των μηνών θα μπορούσες να πειραματιστείς και να εξασκηθείς ταυτόχρονα στην VBA

Φιλικά/Γιώργος.

Καλημέρα

Μάνο, νόμισα ότι ήθελες τα μηνιαία αποτελέσματα να διατάσσονται οριζόντια, αλλά όχι συνεχόμενα.

Βλέποντας πάλι το μήνυμά σου διαπίστωσα ότι μάλλον θέλεις τα μηνιαία αποτελέσματα να διατάσσονται κατακόρυφα.

Αν δεν τα κατάφερες δες μια προσέγγιση στο επισυναπτόμενο αχρείο.

Φιλικά/Γιώργος

Γιώργο καλησπέρα,

Προσπάθησα να βγάλω άκρη, αλλά δεν κατάφερα να ανακαλύψω στον κώδικα ότι η θέση των αποτελεσμάτων κάθε μήνα καθορίζεται από τη μεταβλητή rngOutMonth.

Η βοήθεια σου μέχρι τώρα με παρακίνησε να ψάξω περισσότερο την VBA. Ευχαριστώ και πάλι.
Πραγματικά οι υποδείξεις και τα παραδείγματα σου προσωπικά με κατατόπισαν πλήρως.:icon_hihi::respect: