Φόρμα με περιορισμούς
 

Καλησπέρα και Χρόνια Πολλά σε όλους!!!

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

Το πρόβλημα μου είναι το εξής. Θέλω να ορίσω όριο στις μέρες αδείας που παίρνει ο κάθε υπάλληλος(π.χ 30 ημέρες και 4 πορείας για την Κανονική), καθώς να περιορίσω ότι δικαιούται μόνο μια φορά ημέρες πορείας (4 μέρες) με κάθε άδεια που λαμβάνει. Προσπαθησα να μου εμφανίζει και το υπόλοιπο ημερών αλλά κάνω κάτι λάθος.

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

Κάθε σας βοήθεια είναι πολύτιμη! Σας ευχαριστώ εκ των προτέρων.

Καλησπέρα και καλή Χρονιά εύχομαι σε όλους..Προσπαθώ να κάνω να μετράει τις άδεις στον κάθε υπάλληλο αλλά δεν τα καταφέρνω. Μπορεί κάποιος να βοηθήσει; Να δημιουργήσω ερώτημα και να με την συνάρτηση IF να κάνει το άθροισμα στο είδος της άδειας;

Καλησπέρα Νικόλα.
Ξαναδές το παράδειγμα http://www.ms-office.gr/forum/access...ma-access.html
και τον κώδικα στο modul1.Αφαιρεί Σαββατοκύριακα αργίες κλπ.

Naso σε ευχαριστώ πολυ! Δεν τους χρειάζομαι αυτούς τους υπολογισμούς. Τους αφαιρεσα απο το module. Θέλω κατα κάποιον τροπο να υπολογίζονται τα υπολοιπα σε κάθε άδεια καθενος εργαζόμενου και να το εμφανίζει στην φόρμα. Προσπαθησα με ερώτημα και κριτήρια και το αθροισμα των ημερων αλλά δεν ξέρω πως θα τα αποθηκευω σε πίνακα ώστε να τα εμφανιζω και στην φόρμα...

Καλησπέρα, Καλή Χρονιά

...ελπίζω να βοηθηθείς.

Με εκτίμηση / Νίκος

Νίκο Χρόνια Πολλά και Καλή Χρονιά!
Σε ευχαριστώ πολύ για την βοήθεια!

Πραγματικα ειχα σκαλωσει και είναι πολύ χρήσιμο!

Κατι τελευταίο...Υπάρχει τρόπος τα υπόλοιπα να τα αποθηκεύει και σε πίνακα ή σε ερώτημα κάπως;

Νικόλα και η δική μου εκδοχή με ορισμένες τροποποιήσεις

Καλησπέρα

Η αποθήκευση πληροφοριών (προϊόντα δεδομένων) δεν συνιστάται. Βέβαια εσύ, μπορείς με άνεση να διαχειρίζεσαι πίνακες και ερωτήματα, οπότε καλά κάνεις και σκέφτεσαι έτσι... Γράψε στο Forum ποια στοιχεία θέλεις να βλέπεις με μια ματιά και υπό ποιες προϋποθέσεις. Θα έχεις την απάντηση που θες από τα μέλη.

Δες και την ανάρτηση του φίλου μας Νάσου. Οι προτάσεις του είναι πάντα σπουδαίες.

Με εκτίμηση/ Νίκος

Nasο πολύ καλή και η ιδέα σου! Βέβαια για κάποιο λόγο δεν λειτουργεί και μου βγάζει error όταν πάω να πληκτρολογήσω ημερομηνία και σε συγκεκριμένα στην μακροεντολή "refresh".

Private Sub StartDate_BeforeUpdate(Cancel As Integer)
DoCmd.RunMacro "refresh", 1
End Sub

Αλλάζοντάς το σε

Private Sub StartDate_BeforeUpdate(Cancel As Integer)
DoCmd.RunMacro "refresh", 0
End Sub

Δουλεύει κανονικά! Υπάρχει πρόβλημα που το έκανα έτσι; Τώρα άρχισε να τρεχει κανονικά όλη η εφαρμογή και είναι φοβερή! :yahoo:

Ενημέρωση: Δεν τα υπολογίζει όμως μόλις το άλλαξα... Αλλά δεν βγάζει error με αυτή την αλλαγή

Νικόλα σβήσε τα παρακάτω


Private Sub StartDate_Change()
DoCmd.RunMacro "refresh", 1
End Sub

Private Sub StartDate_BeforeUpdate(Cancel As Integer)
DoCmd.RunMacro "refresh", 1
End Sub

Ξανα ανεβάζω τη βάση με τις διορθώσεις

Νάσο σε ευχαριστώ πολύ για τον χρόνο σου! Για κάποιο λογο στην φόρμα που εμφανίζεται το υπόλοιπο δεν ανανεώνεται ενω στον πίνακα απο τι βλέπω ανανεώνεται. :001:

Μια χαρά δουλεύει τελικά νομιζω. Τους πινακες διορθωσα και παίζει τέλεια! Θα το προσαρμοσω και θα το ανεβασω τελειωμένο!

Σε ευχαριστώ Νικόλα.
Ένα πρόβλημα που θα αντιμετωπίσεις σίγουρα είναι η περίπτωση να συμπίπτουν
οι ημερομηνίες αδειών.
Δες τη λύση αυτού του προβλήματος απο τον Δάσκαλο του forum Γιώργο "Kapetang" http://www.ms-office.gr/forum/access...html#post13063
Γιώργο:worthy:

Είστε πραγματικά απίστευτοι και οι δυό σας! Κάθομαι και διαβάζω τα θέματα και μαθαίνω αρκετά πράγματα απο τις λύσεις σας! Σας συγχαίρω πραγματικά!!

Προέκυψαν 2 θεματάκια.

1. Εκεί που εμφανίζεται το υπόλοιπο για κάποιο λόγο όταν αλλάζω έτος η φόρμα υπολογίζει για το προηγούμενο με αποτέλεσμα. π.χ Έχω επιλέξει για το 2015 να πάρει κάποιες άδειες και υπολογίζει σωστά το υπόλοιπο αλλά όταν πάω να καταχωρήσω για το 2016 εμφανίζει το προηγούμενο υπόλοιπο. Είναι κάποιο θέμα στην ανανέωση του πεδίου ή στην DLooukUp?:hmm:

2. Υπάρχει τρόπος να ορίσω για το διαθέσιμο προσωπικό ότι θα δικαούνται π.χ Κανονική 25 μέρες για το έτος 2015 κλπ; Θα βόλευε ένα ερώτημα ενημέρωσης πίνακα σε αυτό; Σκέφτηκα επίσης να δημιουρήσω ένα αρχείο .xls όπου να εισάγει στον πίνακα dikaiotai τι δικαιούται ο καθένας.


Και πάλι σας ευχαριστώ για την πολύτιμη βοήθειά σας! :033:

Φίλε Νάσο, σ’ ευχαριστώ.

Χαίρομαι ιδιαίτερα, για τη δραστηριότητά σου στο φόρουμ και τις εύστοχες λύσεις σου.

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

Για το δεύτερο ερώτημα κάνε ότι βολεύει εσένα καλύτερα
.

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

Νάσο χίλια ευχαριστώ!!!:thumbup::thumbup:

Σας ευχαριστώ πραγματικά ΌΛΟΥΣ για την πολύτιμη βοήθειά σας! Τρέχει άψογα!!!!
Το forum σας είναι πραγματικά η καλύτερη εγκυκλοπαίδεια για το office (VBA)!!:thumbup: