[Excel07] Υπολογισμός ωρών από βάρδιες

[Stamatis_Bn]

Οι τελευταίες διορθώσεις που έχουν γίνει από τον kapetang είναι ότι πλέον στο κελί μια ημέρας μπορεί να βάλεις πλήρες ωράριο και να σου κάνει την ανάλυση ωρών πχ από 22:00 έως 06:00 πλέον μπορεί να εισαχθεί στα κελιά μιας ημέρας και όχι να σπάσει απο 22:00 έως 24:00 και μετά στην επόμενη ημέρα 0:00 έως 06:00.

[Stamatis_Bn]

Καλησπέρα σε όλους τους φίλους. Καλησπέρα Γιώργο. Δουλεύοντας το πρόγραμμα μπορώ να πω ότι είναι άψογο και δεν βλέπω κανένα πρόβλημα. Το μόνο που θα ήθελα να διαμορφώσω και αυτό προκύπτει από δική μου ανάγκη είναι το εξής. Επειδή στην δουλειά που τρέχω τα ωραρια εργασίας είναι όλο το 24ωρο συμβαίνει το εξής. Έστω ότι την τελευταία ημέρα του μήνα ο εργαζόμενος δουλεύει από 22:00 έως 06:00 πρέπει να εισάγω στα κελιά της τελευταίας ημέρας του μήνα από 22:00 έως 24:00 και στην πρώτη του επόμενου μήνα από 0:00 έως 06:00. Ο ίδιος εργαζόμενος όμως δουλεύει την πρώτη του μήνα και από 20:00 έως 01:00 οπότε εδώ δημιουργείτε η ανάγκη πάλι για έξτρα κελί. Αυτό που θα ήθελα Γιώργο εάν γίνεται φυσικά είναι αν μπορούσε να υπολογίζεται και το τελευταίο κελί του μήνα το πλήρες ωράριο όπως στα προηγούμενα ας μπαίνουμε ημερολογιακά στον επόμενο μήνα. Σε ευχαριστώ για την πολύτιμη βοήθεια σου.

[kapetang]

Καλησπέρα

Σταμάτη, δες το συνημμένο.

Αντί να τροποποιήσω το αρχείο BARDIES_corrected, δημιούργησα νέο.

Στο νέο αρχείο, χρησιμοποιείται κώδικας VBA.

Διαφέρει από το παλιό:

1) Στη μηνιαία κατάσταση το ωράριο εργασίας καταχωρείται σε ένα κελί στη μορφή: ωω:λλ-ωω:λλ.

2) Έχει προστεθεί κανόνας επικύρωσης που ελέγχει την εγκυρότητα της καταχώρησης.

3) Δε χρησιμοποιούνται βοηθητικές στήλες και η κατάσταση είναι απλούστερη.

4) Οι ώρες εργασίας καταχωρούνται στο μήνα που έγινε η έναρξη της εργασίας, ακόμα και αν κάποιες ανήκουν στον επόμενο.

5) Αργίες θεωρούνται οι Κυριακές και οι επίσημες γιορτές (όχι τα Σάββατα).

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

Προσθήκη:

Προστέθηκε η δυνατότητα επιλογής εβδομάδας 5 ή 6 εργάσιμων ημερών.

[Stamatis_Bn]

Γιώργο καλησπέρα φίλε μου. Το δοκίμασα διεξοδικά το πρόγραμμα και είναι πραγματικά τέλειο για εμένα τουλάχιστον. Το έχεις απλοποιήσει ακόμη περισσότερο, είναι άψογο στους υπολογισμούς, υπολογίζει μόνο του τις ημερομηνίες βάζοντας την αρχική, και ευνοεί περισσότερο το copy paste στα κελιά γιατί πολλά προγράμματα είναι κυλιόμενα και βολεύει πάρα πολύ. Πραγματικά είσαι απίστευτος, μπράβο σου φίλε. Σε ευχαριστώ πολύ για τον χρόνο σου και την βοήθεια σου. Οτιδήποτε παρατηρώ θα το ποστάρω εδώ. Ευχαριστώ και πάλι.

[kapetang]

Καλησπέρα

Σταμάτη να είσαι καλά.

Πιστεύω ότι αύριο θα ολοκληρώσω και θα αναρτήσω μια πιο βελτιωμένη έκδοση του προγράμματος, που θα αντιμετωπίζει και την περίπτωση της εβδομάδας των 5 εργάσιμων ημερών, καθώς και μια αβλεψία στον κανόνα επικύρωσης των δεδομένων, που επιβάλλει την καταχώρηση 12:00-00:00 και δεν επιτρέπει την ισοδύναμη 12:00-24:00.

[kapetang]

Καλημέρα

Μια πιο ολοκληρωμένη προσέγγιση στο σύνδεσμο:

http://www.ms-office.gr/forum/excel-...html#post26919

[Stamatis_Bn]

Γιώργο καλησπέρα φίλε μου. Το δοκίμασα και το δοκιμάζω συνεχώς. Έως τώρα είναι άψογο. Εάν κάτι διαπιστώσω θα το ποστάρω εδώ. Συγχαρητήρια για την εξαιρετική δουλειά σου.

[kapetang]

Φίλε Σταμάτη να είσαι καλά!

[yannis]

Αρχική Δημοσίευση από kapetang

Καλημέρα

Μια πιο ολοκληρωμένη προσέγγιση στο σύνδεσμο:

http://www.ms-office.gr/forum/excel-...html#post26919

Καλημέρα,
Γίνεται σε παρακαλώ να μου εξηγήσεις πως η συνάρτηση(=MonthWork($C$4;C6:AG6)) υπολογίζει την ημέρα από την νύχτα. Προσπαθώ να την προσαρμόσω σε ένα δικό μου φύλλο και μου βγάζει το ίδιο αποτέλεσμα.
Σ’ ευχαριστώ εκ των προτέρων

[kapetang]

Καλημέρα

Γιάννη, μάλλον δεν εισάγεις σωστά τη συνάρτηση.

Η συνάρτηση επιστρέφει 4 τιμές και συνεπώς είναι συνάρτηση πίνακα.

Για την εισαγωγή της:

1) Επιλέγουμε σε μία γραμμή 4 συνεχόμενα κελιά.

2) Πληκτρολογούμε τη συνάρτηση

3) Μετά την ολοκλήρωση της πληκτρολόγησης πατούμε Ctrl + Shift + Enter.

Η ενέργεια αυτή θα περιβάλει τη συνάρτηση με άγκιστρα και θα τη μετατρέψει σε συνάρτηση πίνακα.

Για την αντιγραφή προς τα κάτω, θα πρέπει να επιλέξουμε και τα 4 κελιά και να σύρουμε.