[VBA] Πρόγραμμα εργασίας- Εφημερίες- Επιτηρήσεις- Κατανομή προσωπικού σε βάρδιες (πόστα)

[kapetang]

Καλημέρα

1) Αφού καλύπτεσαι, άφησα 20 εργαζόμενους.

Σκέπτομαι, αν βρω χρόνο, να ξανασχεδιάσω την εφαρμογή, για να διευκολύνει την προσθαφαίρεση εργαζόμενων.

2) Για μεγαλύτερη ευελιξία συμπληρώνονται όλες ημερομηνίες.

Ο χρήστης (πριν την επιλογή) θα πρέπει να διαγράφει τις γραμμές με τις άχρηστες ημερομηνίες.


3) Η επιλογή των διαθέσιμων γίνεται με τα CheckBox.

5) Η εκτύπωση παρέμεινε η ίδια.

Με τα καλλιτεχνικά δεν τα πάω καλά.

[pant]

Καλημέρα και χρόνια πολλά
Προσπαθώ να προσαρμόσω το πρόγραμμα του Θανάση (gr8styl) για επιτηρήσεις του σχολείου.
Πολύ καλό για να έχεις ένα μπούσουλα και αξιόλογη δουλειά , όμως συνάντησα ένα πρόβλημα μετά από τις παρεμβάσεις που έκανα
1. τις Παρασκευές δεν συμπληρώνει καινούργια ονόματα
και παράκληση
ΕΑΝ γίνετε να υπάρχει ισοκατανομή επιτηρήσεων (στήλη βάρδιες) μεταξύ των συναδέλφων
ευχαριστώ Γρηγόρης

[kapetang]

Καλημέρα

Για τον καθορισμό των βαρδιών προτάθηκαν 2 τρόποι.

Στον ένα, του Θανάση, δε χρησιμοποιείται κώδικας (VBA) και στον άλλο χρησιμοποιείται.

Στις τελευταίες αναρτήσεις χρησιμοποιείται αποκλειστικά η λύση με κώδικα.

Θα μπορούσες να δεις (έστω με λιγότερα άτομα) πως δουλεύουν και αν σε εξυπηρετούσαν να ζητήσεις τις κατάλληλες προσαρμογές.

[pant]

καλημερα

Γιώργο σε ευχαριστώ για το ενδιαφερον
Τελικα ειδα οτι με vba ειναι πιο προσιτό με μικρες προσθέσεις εαν μπορεις
1. επεκταση ημερών στα < Μη διαθεσιμα σύμφωνα με το ωρολογιο προγραμμα > αντιστοιχα με τις ημερομηνιες στην στηλη j
2. Μεταφορά απο Φύλλο1 εισηγήσεις (ονομα-ημερομηνια) στο Program στις αντοιστιχες θεσεις (ονομα-ημερομηνια) τοποθετοντας το <1> στο < Μη διαθεσιμα σύμφωνα με το ωρολογιο προγραμμα > . Ελευθερη επιλογη με την 2η βαρδια (εαν θελεις να την υπολογίζεις ή οχι)

το Διαθεσιμοτητα δεν καταλαβα πως λειτουργει σε σχεση με το < Μη διαθεσιμα σύμφωνα με το ωρολογιο προγραμμα >
ευχαριστω Γρηγορης

[kapetang]

Καλησπέρα

Γρηγόρη κάνε δοκιμές στο συνημμένο.

Από τους διαθέσιμους κάθε μέρα επιτηρητές επιλέγονται 14 με τέτοιο τρόπο ώστε να γίνεται εξισορρόπηση.

[kapetang]

Καλησπέρα

Ο συμπιεσμένος φάκελος, που επισυνάπτεται, περιέχει 2 αρχεία Excel.

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

1) Το αρχείο ProgramWork14ByDayWeek .xlsm είναι κατάλληλο για την περίπτωση που η διαθεσιμότητα εξαρτάται από τη μέρα της εβδομάδας (πχ κάποιοι πχ τη Δευτέρα έχουν άλλη απασχόληση και αδυνατούν να είναι επιτηρητές).

2) Στο αρχείο ProgramWork14ByDayData .xlsm υπάρχει ξεχωριστό φύλλο (Data), όπου σε κάθε κελί που καθορίζεται από τη γραμμή του εργαζόμενου και τη στήλη της ημερομηνίας, αναγράφεται ο λόγος του κωλύματος.

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

3) Η επιλογή γίνεται έτσι ώστε να έχουμε εξισορρόπηση επιτηρήσεων και να αποτρέπονται οι αδικίες

[pant]

Γιώργο καλημερα
Τελικά το προγραμμα μας βοήθησε αρκετα ωστε να βγαλουμε επιτηρητες
ευχαριστω για την βοήθεια

[pant]

Γιωργο συγνωμη δεν ειδα την καινουργια εκδοση που ανεβασες

Καταρχήν διόρθωσεις το προβλημα που ειχα με την δευτερη βαρδια
Δευτερον εφαρμοζετε για ολες τις ημερες των εξετάσεων με εξισορόπηση, ευχαριστω

Ενα προβλημα που εντοπίσαμε ειναι οτι καποιες ημερες δεν θελω 14 επιτηρητες αλλα 5 ή 8 ή 9
μπορει να μπει μια επιλογη ανα ημερα ????

ευχαριστω

[pant]

μπορεις να βαλεις pull down στο DATA για επιλογη σε καθε κελί (ΕΙΣΗΓΗΤΗΣ(18:00-20:00 ), ΕΙΣΗΓΗΤΗΣ(20:00-22:00 )ΑΔΕΙΑ,ΑΝΝΑΡΩΤΙΚΗ )

[kapetang]

Καλησπέρα

Γρηγόρη, δες το συνημμένο.