Ανανέωση ιστοσελίδας
ms-office.gr > Forum > Microsoft Excel > Excel - Ερωτήσεις / Απαντήσεις > [VBA] Πρόγραμμα εργασίας- Εφημερίες- Επιτηρήσεις- Κατανομή προσωπικού σε βάρδιες (πόστα)

Excel - Ερωτήσεις / Απαντήσεις Ότι έχει σχέση με συναρτήσεις, μορφοποίηση, εκτυπώσεις γραφήματα κτλ.

Απάντηση στο θέμα

 

Εργαλεία Θεμάτων Τρόποι εμφάνισης
  #1  
Παλιά 04-12-12, 14:34
NIC Ο χρήστης NIC δεν είναι συνδεδεμένος
Όνομα: Νίκος
Έκδοση λογισμικού Office: Ms-Office 2007
Γλώσσα λογισμικού Office: Ελληνική
 
Εγγραφή: 13-08-2009
Μηνύματα: 21
Προεπιλογή Πρόγραμμα εφημεριών

Μου ζήτησε έναν φίλος που δουλεύει σε σχολειό και έχει αναλάβει τις εφημερίες των συναδέλφων του κάτι «εύκολο» ώστε αφού καταχωρεί κάπου τις διάφορες δεσμεύσεις των συναδέλφων μετά να βγαίνουν αυτόματα οι εφημερίες ( μετά απλά θα αλλάζει η σειρά μεταξύ τους ανά μέρα)
Υπάρχει δυνατότητα να μπει παράμετρος ότι όλοι θα κάνουν από δυο .
Σας στέλνω το αρχείο που χρησιμοποιούν για χειρόγραφη επεξεργασία που κάνουν τώρα
( δεν ξέρω μήπως πρέπει να γίνει με άλλο πρόγραμμα πχ access)
Συνημμένα Αρχεία
Τύπος Αρχείου: xlsx εφημεριες.xlsx (11,3 KB, 310 εμφανίσεις)
Απάντηση με παράθεση
  #2  
Παλιά 05-12-12, 00:51
Το avatar του χρήστη gr8styl
Super Moderator
Όνομα: Θανάσης Στυλιανίδης
Έκδοση λογισμικού Office: Ms-Office 2003, Ms-Office 2010
Γλώσσα λογισμικού Office: Ελληνική, Αγγλική
 
Εγγραφή: 18-10-2009
Περιοχή: Βρυξέλλες, Βέλγιο
Μηνύματα: 758
Προεπιλογή

Καλησπέρα/Καλημέρα

Δες στο συνημμένο μια πρόταση/προσέγγιση.
Ελπίζω να βοηθήσει.

Φιλικά
Θανάσης
Συνημμένα Αρχεία
Τύπος Αρχείου: xls efimeries_01.xls (54,5 KB, 356 εμφανίσεις)
Απάντηση με παράθεση
  #3  
Παλιά 21-09-18, 08:21
Όνομα: ΣΤΑΎΡΟΣ
Έκδοση λογισμικού Office: Ms-Office 2007
Γλώσσα λογισμικού Office: Ελληνική
 
Εγγραφή: 20-09-2018
Μηνύματα: 29
Προεπιλογή ΕΦΗΜΕΡΙΕΣ ΣΕ ΔΗΜΟΤΙΚΟ ΣΧΟΛΕΙΟ

Παράθεση:
Αρχική Δημοσίευση από gr8styl Εμφάνιση μηνυμάτων
Καλησπέρα/Καλημέρα

Δες στο συνημμένο μια πρόταση/προσέγγιση.
Ελπίζω να βοηθήσει.

Φιλικά
Θανάσης
ΠΑΙΔΙΑ ΒΟΗΘΕΙΑ
ΕΧΟΥΜΕ 8 ΕΚΠΑΙΔΕΥΤΙΚΟΥΣ ΤΗΝ ΕΒΔΟΜΑΔΑ
ΠΡΕΠΕΙ ΝΑ ΚΑΝΟΥΝ ΕΦΗΜΕΡΙΑ ΚΑΘΕ ΜΕΡΑ 2
ΠΩΣ ΜΠΟΡΟΥΜΕ ΝΑ ΒΓΑΛΟΥΜΕ ΤΙΣ ΕΤΗΣΙΕΣ ΕΦΗΜΕΡΙΕΣ ΧΩΡΙΣ ΝΑ ΑΔΙΚΗΣΟΥΜΕ ΚΑΝΕΝΑ
Απάντηση με παράθεση
  #4  
Παλιά 21-09-18, 11:40
Όνομα: Γιώργος
Έκδοση λογισμικού Office: Ms-Office 2010
Γλώσσα λογισμικού Office: Ελληνική, Αγγλική
 
Εγγραφή: 18-06-2010
Μηνύματα: 3.674
Προεπιλογή

Καλησπέρα

Σταύρο δες μια λύση στο συνημμένο.

Η λύση στηρίζεται σε κώδικα (VBA), συνεπώς απαιτείται ενεργοποίηση των μακροεντολών.

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

ΥΓ Μη χρησιμοποιείς κεφαλαία. Κάνουν το κείμενο δυσανάγνωστο και κουραστικό.
Συνημμένα Αρχεία
Τύπος Αρχείου: xlsm ProgramWork2ByDay.xlsm (37,7 KB, 236 εμφανίσεις)
Απάντηση με παράθεση
  #5  
Παλιά 22-09-18, 00:40
Όνομα: ΣΤΑΎΡΟΣ
Έκδοση λογισμικού Office: Ms-Office 2007
Γλώσσα λογισμικού Office: Ελληνική
 
Εγγραφή: 20-09-2018
Μηνύματα: 29
Προεπιλογή Eυχαριστώ!!!!!!!!!!!!!

Παράθεση:
Αρχική Δημοσίευση από kapetang Εμφάνιση μηνυμάτων
Καλησπέρα

Σταύρο δες μια λύση στο συνημμένο.

Η λύση στηρίζεται σε κώδικα (VBA), συνεπώς απαιτείται ενεργοποίηση των μακροεντολών.

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

ΥΓ Μη χρησιμοποιείς κεφαλαία. Κάνουν το κείμενο δυσανάγνωστο και κουραστικό.
Σε ευχαριστώ παρα πολύ για την βοήθεια
Να είστε πάντα καλά
Απάντηση με παράθεση
  #6  
Παλιά 22-09-18, 06:22
Όνομα: Γιώργος
Έκδοση λογισμικού Office: Ms-Office 2010
Γλώσσα λογισμικού Office: Ελληνική, Αγγλική
 
Εγγραφή: 18-06-2010
Μηνύματα: 3.674
Προεπιλογή

Να είσαι καλά Σταύρο. Καλή συνέχεια.
Απάντηση με παράθεση
  #7  
Παλιά 09-12-18, 23:55
Όνομα: Καίτη
Έκδοση λογισμικού Office: Ms-Office 2007
Γλώσσα λογισμικού Office: Ελληνική
 
Εγγραφή: 03-12-2018
Μηνύματα: 11
Προεπιλογή

Συνάδερφοι,
όλα τα παραπάνω προγράμματα είναι μόνο για ένα άτομο κάθε φορά;

Στο σχολείο μου έχουμε 5 πόστα και είναι με βάρδιες 8-11 και 11-2 , 12 άτομα από 2 φορές και κυλιόμενα 2 άτομα κάθε φορά θα κάνουν από 3. Σύνολο 50 την εβδομάδα.

Ταιριάζει κάτι σε αυτό;
Απάντηση με παράθεση
  #8  
Παλιά 10-12-18, 12:39
Όνομα: Γιώργος
Έκδοση λογισμικού Office: Ms-Office 2010
Γλώσσα λογισμικού Office: Ελληνική, Αγγλική
 
Εγγραφή: 18-06-2010
Μηνύματα: 3.674
Προεπιλογή

Καλησπέρα

Καίτη, το συνημμένο πρόγραμμα είναι προσαρμοσμένο στο ζητούμενο.

Δηλαδή για κάθε μέρα επιλέγει 10 εργαζόμενους, έτσι ώστε να καλύπτονται οι ημερήσιες ανάγκες (5 πόστα * 2 βάρδιες = 10 υπηρεσίες).

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

Σημειώνω τα εξής:

1) Για τη λειτουργία του προγράμματος οι διαθέσιμοι εργαζόμενοι πρέπει να είναι κάθε μέρα τουλάχιστον 10.

2) Η εξισορρόπηση των υπηρεσιών γίνεται συνολικά.

Αυτό σημαίνει ότι οι εργαζόμενοι θα έχουν τον ίδιο αριθμό υπηρεσιών συνολικά, αλλά κατά περίπτωση (πχ υπηρεσίες στο πόστο 1 από 8-11) πιθανόν διαφορετικό.

Έτσι, αν οι 10 περιπτώσεις δεν έχουν τον ίδιο βαθμό δυσκολίας, κάποιοι θα είναι ευνοημένοι και κάποιοι ριγμένοι.
Συνημμένα Αρχεία
Τύπος Αρχείου: xlsm ProgramWork10ByDay.xlsm (36,2 KB, 48 εμφανίσεις)
Απάντηση με παράθεση
  #9  
Παλιά 10-12-18, 21:50
Όνομα: Καίτη
Έκδοση λογισμικού Office: Ms-Office 2007
Γλώσσα λογισμικού Office: Ελληνική
 
Εγγραφή: 03-12-2018
Μηνύματα: 11
Προεπιλογή

Γιώργο ευχαριστώ για την απάντηση σου.

Το κατέβασα το πρόγραμμα και έχω τις εξής απορίες :
1. Πως δείχνω ποιοι συνάδερφοι πρέπει να μπουν πρώτη βάρδια και ποιοι δεύτεροι; τους έγραψα τυχαία στην λίστα και μου τους εμφάνισε τυχαία στις υπηρεσίες και κάποιες είναι λάθος.
2. Πρέπει να προσθέσω 24 καθηγητές στη λίστα. Πως μπορώ να το κάνω;
Απάντηση με παράθεση
  #10  
Παλιά 10-12-18, 22:59
Όνομα: Γιώργος
Έκδοση λογισμικού Office: Ms-Office 2010
Γλώσσα λογισμικού Office: Ελληνική, Αγγλική
 
Εγγραφή: 18-06-2010
Μηνύματα: 3.674
Προεπιλογή

Καίτη σχετικά με τις απορίες σου:

«1. Πως δείχνω ποιοι συνάδερφοι πρέπει να μπουν πρώτη βάρδια και ποιοι δεύτεροι; τους έγραψα τυχαία στην λίστα και μου τους εμφάνισε τυχαία στις υπηρεσίες και κάποιες είναι λάθος.»

Στο φύλλο εργασίας υπάρχουν 10 στήλες.

Αν ένας εργαζόμενος, μία συγκεκριμένη ημερομηνία, τοποθετηθεί με το πάτημα του κουμπιού στη στήλη με τίτλο "Πόστο2 (11-14)", σημαίνει ότι θα εργαστεί στο πόστο 2 το χρονικό διάστημα από 11:00 έως 14:00.

Με άλλα λόγια οι τίτλοι των στηλών καθορίζουν που θα εργαστεί κάποιος τη συγκεκριμένη ημερομηνία.

Αν δεν βολεύουν οι τίτλοι που όρισα μπορείς να τους αλλάξεις.

Γράφεις επίσης κάποιες είναι λάθος. Τι εννοείς;

«2. Πρέπει να προσθέσω 24 καθηγητές στη λίστα. Πως μπορώ να το κάνω;»

Στο συνημμένο έκανα αλλαγές ώστε να μπορείς να προσθέσεις μέχρι 30 εργαζόμενους.

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

Θα πρότεινα να ξαναδιαβάσεις τις ενέργειες που αναφέρονται στο φύλλο εργασίας και να τις εφαρμόσεις με τη σειρά αρίθμησής τους.
Συνημμένα Αρχεία
Τύπος Αρχείου: xlsm ProgramWork10ByDay2.xlsm (41,0 KB, 35 εμφανίσεις)
Απάντηση με παράθεση
Απάντηση στο θέμα


Δικαιώματα - Επιλογές
Δε μπορείτε να δημοσιεύσετε νέα μηνύματα
Δε μπορείτε να δημοσιεύσετε απαντήσεις
Δεν μπορείτε να επισυνάψετε αρχεία
Δεν μπορείτε να επεξεργαστείτε τα μηνύματα σας

Ο κώδικας ΒΒ είναι σε λειτουργία
Τα Smilies είναι σε λειτουργία
Ο κώδικας [IMG] είναι σε λειτουργία
Ο κώδικας HTML είναι εκτός λειτουργίας
Trackbacks are εκτός λειτουργίας
Pingbacks are εκτός λειτουργίας
Refbacks are εκτός λειτουργίας


Παρόμοια Θέματα

Θέμα Δημιουργός Forum Απαντήσεις Τελευταίο Μήνυμα
[VBA] Πρόγραμμα Αδειών Προσωπικού spiroschrysis Excel - Ερωτήσεις / Απαντήσεις 37 20-11-24 21:16
[Γενικά] Πρόγραμμα Αδειών Προσωπικού spmatrix Excel - Ερωτήσεις / Απαντήσεις 15 07-03-23 18:01
Πρόγραμμα εργασίας- Εφημερίες- Επιτηρήσεις- Κατανομή προσωπικού σε βάρδιες (πόστα) kapetang Excel samples - Χρήσιμα αρχεία & παραδείγματα 0 12-02-23 13:57
[Συναρτήσεις] βαρδιες προσωπικού spiros1982 Excel - Ερωτήσεις / Απαντήσεις 9 12-12-21 17:42
[Γενικά] Πρόγραμμα για βάρδιες XATZOPOULOS DHMOKRITOS Excel - Ερωτήσεις / Απαντήσεις 4 25-10-20 10:12


Η ώρα είναι 19:14.