Ανανέωση ιστοσελίδας
ms-office.gr > Forum > Microsoft Access > Access - Ερωτήσεις / Απαντήσεις > Ορισμένος αριθμός εγγραφών σε έκθεση

Access - Ερωτήσεις / Απαντήσεις Access + VBA... Εδώ δεν υπάρχουν όρια!

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

 

Εργαλεία Θεμάτων Τρόποι εμφάνισης
  #11  
Παλιά 19-01-14, 10:40
Όνομα: Γιώργος
Έκδοση λογισμικού Office: Ms-Office 2010
Γλώσσα λογισμικού Office: Ελληνική, Αγγλική
 
Εγγραφή: 18-06-2010
Μηνύματα: 3.674
Προεπιλογή

Καλημέρα στην παρέα.

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

Γιώργο, για να γίνει σωστή η αρίθμηση των εγγραφών στα ερωτήματα που περιέχουν κριτήρια, πρέπει στη σχετική συνάρτηση CounterRows να λάβουμε υπόψη μας και τα κριτήρια.

Στη ΒΔ που επισυνάπτω, στο ερώτημα Query1 πρόσθεσα το κριτήριο ID=2.

Το ίδιο κριτήριο πρόσθεσα και στη συνάρτηση CounterRows.Έτσι η πρόταση:
strSQL = "SElect [ID ΠΛΗΡΩΜΩΝ] FROM tblPliromes ORDER BY 1"

έγινε: strSQL = "SElect [ID ΠΛΗΡΩΜΩΝ] FROM tblPliromes WHERE ID=2 ORDER BY 1"

Η καλύτερη λύση είναι να ορίζουμε τα κριτήρια σε μια φόρμα και να ανοίγουμε την έκθεση από κει.

Φυσικά θα πρέπει να διαμορφώσουμε κατάλληλα και τα κριτήρια στην πρόταση strSQL=… της συνάρτησης .

Λεπτομέρειες για την αρίθμηση των εγγραφών των ερωτημάτων υπάρχουν στο σύνδεσμο:
http://www.ms-office.gr/forum/access...rotimatos.html

Φιλικά/Γιώργος
Συνημμένα Αρχεία
Τύπος Αρχείου: accdb ΚαθορισμόςΠλήθουςΕγγραφώνΑνάΣελίδα2.accdb (460,0 KB, 14 εμφανίσεις)
Απάντηση με παράθεση
  #12  
Παλιά 19-01-14, 11:07
Όνομα: Χρήστος Φ.
Έκδοση λογισμικού Office: Ms-Office 2007
Γλώσσα λογισμικού Office: Ελληνική
 
Εγγραφή: 20-12-2010
Περιοχή: Θεσσαλονίκη
Μηνύματα: 498
Προεπιλογή

Καλημέρα
Γιώργο,
Διέγραψα το Module, τροποποίησα το counter με την συνάρτηση που ανέφερα και η έκθεσή σου συνεχίζει να λειτουργεί. Ακόμη και όταν θέλησα ομαδοποίηση ανά 15 (Group15: (counter-1)/15) ... η έκθεση λειτούργησε.
Χωρίς να θέλω να γίνω κουραστικός, τι εννοείς λέγοντας "η access δε θα επέτρεπε να χρησιμοποιήσεις τις τιμές που επιστρέφει για την ομαδοποίηση των εγγραφών στην έκθεση."

Τελευταία επεξεργασία από το χρήστη Χρήστος : 16-10-16 στις 18:57.
Απάντηση με παράθεση
  #13  
Παλιά 19-01-14, 11:16
Όνομα: Γιώργος
Έκδοση λογισμικού Office: Ms-Office 2010
Γλώσσα λογισμικού Office: Ελληνική, Αγγλική
 
Εγγραφή: 18-06-2010
Μηνύματα: 3.674
Προεπιλογή

Χρήστο σχετικά με το τελευταίο μήνυμά σου, που είδα τώρα, έχεις δίκιο.

Η αρίθμηση στο ερώτημα, για λόγους ταχύτητας, γίνεται μια φορά.

Για να ξαναγίνει και να προσαρμοστεί στα νέα δεδομένα του πίνακα απαιτείται η πρόταση κώδικα: Set dct = Nothing

Την πρόταση αυτή την έβαλα στο συμβάν Open της έκθεσης.

Έτσι η έκθεση που μας ενδιαφέρει δείχνει πάντα τα σωστά δεδομένα.

Αν μας ενδιαφέρει το ερώτημα πριν ανοίξει θα πρέπει να εκτελείται η πρόταση Set dct = Nothing πχ με τη βοήθεια μιας φόρμας
Φιλικά/Γιώργος
Απάντηση με παράθεση
  #14  
Παλιά 19-01-14, 15:45
Όνομα: Γιώργος
Έκδοση λογισμικού Office: Ms-Office 2010
Γλώσσα λογισμικού Office: Ελληνική, Αγγλική
 
Εγγραφή: 18-06-2010
Μηνύματα: 3.674
Προεπιλογή

Καλησπέρα Χρήστο

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

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

Άλλαξα το ερώτημα και χρησιμοποίησα για την αρίθμηση τη συνάρτηση Dcount.

Δοκίμασα πάλι με τον οδηγό να δημιουργήσω την έκθεση και μου έβγαλε (δεν ξέρω γιατί) το ίδιο μήνυμα.

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

Από τη διαδικασία αυτή προέκυψε η συνάρτηση χρήστη CounterRows.

Φιλικά/Γιώργος
ΥΓ Χρήστο γράφουμε ταυτόχρονα με αποτέλεσμα κάποιες απαντήσεις μου να μη αντιστοιχούν στο σωστό μήνυμά σου.
Απάντηση με παράθεση
  #15  
Παλιά 19-01-14, 16:17
Όνομα: Χρήστος Φ.
Έκδοση λογισμικού Office: Ms-Office 2007
Γλώσσα λογισμικού Office: Ελληνική
 
Εγγραφή: 20-12-2010
Περιοχή: Θεσσαλονίκη
Μηνύματα: 498
Προεπιλογή

Κατάλαβα Γιώργο..απλά σε μένα (με χρήση της Count...) όταν τρέχω τον οδηγό δεν κλοτσάει πουθενά και δημιουργεί την έκθεση με συγκεκριμένο πλήθος εγγραφών ανά σελίδα. Είτε κάνω ομαδοποίηση απ' τον οδηγό είτε αργότερα απ' την προβολή σχεδίασης ... όλα καλά!.
Τα ξαναλέμε... :)
Απάντηση με παράθεση
  #16  
Παλιά 19-01-14, 17:05
Όνομα: ΓΙΩΡΓΟΣ
Έκδοση λογισμικού Office: Ms-Office 2016
Γλώσσα λογισμικού Office: Ελληνική
 
Εγγραφή: 02-02-2010
Μηνύματα: 141
Προεπιλογή

Αγαπητοί φίλοι Χρήστο και Γιώργο, με βοηθήσατε αρκετά και ευχαριστώ πολύ.
Τελικά χρησιμοποίησα ένα δεύτερο ερώτημα με τη μέθοδο που περιγράφει ο Γιώργος στο http://www.ms-office.gr/forum/access...rotimatos.html (4. Παράδειγμα (Ερώτημα qryCounter4)). Να είστε όλοι καλά
Με εκτίμηση
Γιώργος.
Απάντηση με παράθεση
Απάντηση στο θέμα

Εργαλεία Θεμάτων
Τρόποι εμφάνισης

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

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


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

Θέμα Δημιουργός Forum Απαντήσεις Τελευταίο Μήνυμα
Συνολικός αριθμός εγγραφών πίνακα ανα μήνα dimitrisp Access - Ερωτήσεις / Απαντήσεις 3 22-11-15 11:51
[ Εκθέσεις ] οριζόντια εμφάνιση εγγραφών σε έκθεση octapus Access - Ερωτήσεις / Απαντήσεις 6 21-08-14 07:39
[ Εκθέσεις ] Μέτρημα εγγραφών στην έκθεση alekara Access - Ερωτήσεις / Απαντήσεις 11 17-01-13 14:31
Προσθήκη κενών εγγραφών σε Έκθεση Access Tasos Access samples - Χρήσιμα αρχεία & παραδείγματα 0 29-09-11 12:08
Αριθμός εγγραφών σε φόρμα alex Access - Ερωτήσεις / Απαντήσεις 4 17-09-10 11:39


Η ώρα είναι 05:38.