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

Χρήστο, θα μπορούσες να χρησιμοποιήσεις τον τύπο, αλλά η 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

Φιλικά/Γιώργος

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

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

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

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

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

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

Αν μας ενδιαφέρει το ερώτημα πριν ανοίξει θα πρέπει να εκτελείται η πρόταση Set dct = Nothing πχ με τη βοήθεια μιας φόρμας
Φιλικά/Γιώργος

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

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

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

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

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

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

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

Φιλικά/Γιώργος
ΥΓ Χρήστο γράφουμε ταυτόχρονα με αποτέλεσμα κάποιες απαντήσεις μου να μη αντιστοιχούν στο σωστό μήνυμά σου.

Κατάλαβα Γιώργο..απλά σε μένα (με χρήση της Count...) όταν τρέχω τον οδηγό δεν κλοτσάει πουθενά και δημιουργεί την έκθεση με συγκεκριμένο πλήθος εγγραφών ανά σελίδα. Είτε κάνω ομαδοποίηση απ' τον οδηγό είτε αργότερα απ' την προβολή σχεδίασης ... όλα καλά!.
Τα ξαναλέμε... :)

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