Εμφάνιση ενός μόνο μηνύματος
  #3  
Παλιά 27-10-13, 15:11
kapetang Ο χρήστης kapetang δεν είναι συνδεδεμένος
Όνομα: Γιώργος
Έκδοση λογισμικού Office: Ms-Office 2010
Γλώσσα λογισμικού Office: Ελληνική, Αγγλική
 
Εγγραφή: 18-06-2010
Μηνύματα: 3.674
Προεπιλογή

Καλησπέρα

Λάμπρο, ένας τρόπος για να εμφανίζονται στο διάγραμμα όλες οι εβδομάδες είναι να το βασίσεις σ’ ένα ερώτημα, που περιέχει όλες τις ημερομηνίες στο επιθυμητό χρονικό διάστημα.

Για να γίνει αυτό πρόσθεσα:

1) Τον βοηθητικό πίνακα tblHLP, που θα περιέχει όλες τις ημερομηνίες του επιθυμητού χρονικού διαστήματος.

2) Το ερώτημα qryChart στο οποίο ο πίνακας tblHLP ενώνεται με μια εξωτερική αριστερή ένωση (LEFT JOIN) με τον πίνακα των πραγματικών δεδομένων [Προπονήσεις].

Στο ερώτημα το πεδίο fDate του πίνακα tblHLp έχει αντικατασταθεί από τα υπολογιζόμενα πεδία [Έτος] και [Εβδομάδα].

Το [Ετος] χρειάζεται για την περίπτωση που το επιθυμητό χρονικό διάστημα εκτείνεται σε περισσότερα από 1 έτη.

Τα ορίσματα στη συνάρτηση που επιστρέφει την εβδομάδα του έτους ορίστηκαν έτσι ώστε
η εβδομάδα να αρχίζει από τη Δευτέρα και η 1 εβδομάδα στο έτος να είναι αυτή που περιέχει την 1/1.

3) Τη φόρμα (διάγραμμα) frmChart, που στηρίζεται στο ερώτημα qryChart.

Για την αυτοματοποίηση της εργασίας πρόσθεσα και τη φόρμα frmOpenChart.

Στη φόρμα αυτή, αφού συμπληρώσουμε την ημερομηνία έναρξης και λήξης του επιθυμητού διαστήματος κάνουμε κλικ στο κουμπί [Άνοιγμα Διαγράμματος].

Ο κώδικας που τρέχει, αφού γεμίσει τον βοηθητικό πίνακαtblHLP με τις κατάλληλες ημερομηνίες, ανοίγει τη φόρμα frmChart.

Φιλικά/Γιώργος
Συνημμένα Αρχεία
Τύπος Αρχείου: accdb ΓράφημαΑνάΕβδομάδα.accdb (1,06 MB, 29 εμφανίσεις)
Απάντηση με παράθεση