Εμφάνιση ενός μόνο μηνύματος
  #7  
Παλιά 15-10-12, 17:16
Το avatar του χρήστη Tasos
Tasos Ο χρήστης Tasos δεν είναι συνδεδεμένος
Διαχειριστής
Όνομα: Τάσος Φιλοξενιδης
Έκδοση λογισμικού Office: Ms-Office 365
Γλώσσα λογισμικού Office: Ελληνική, Αγγλική, Γερμανική
 
Εγγραφή: 21-10-2009
Μηνύματα: 2.035
Προεπιλογή

Αγαπητέ Γιώργο,
Τα πεδία Τ1, Τ2, Τ3, ..... Τ31 στη λεπτομέρεια της φόρμας θα επιστρέψουν την τιμή 0 ή -1 (True ή False)
μόνο αν τα αντίστοιχα πεδία στο υποσέλιδο της φόρμας δεν είναι Null.

Διαφορετικά θα είναι Null και κατά συνέπεια δεν θα "χρωματιστούν" από τη μορφοποίηση υπό όρους που τους έχει οριστεί.

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

Άρα, αυτό που μένει να κάνουμε είναι να τροποποιήσουμε τον τύπο στα πεδία του υποσέλιδου (D1, D2, D3, ..... D31)
έτσι ώστε να μας επιστρέφει την ημερομηνία πχ. 01/10/2012 μόνο όταν αυτή υπάρχει στον πίνακα.

Έχουμε λοιπόν:

Για το πεδίο D1 τον τύπο:
Κώδικας:
=IIf(Nz(DLookUp("[AttendanceID]";"[AttendanceT]";"[AttendanceDate] = #" & 
Format(DateSerial([cboEtos];[FraMonths];1);"μ/η/αααα") & "#");0)=0;Null;DateSerial([cboEtos];[FraMonths];1))
Για το πεδίο D1 τον τύπο:
Κώδικας:
=IIf(Nz(DLookUp("[AttendanceID]";"[AttendanceT]";"[AttendanceDate] = #" & 
Format(DateSerial([cboEtos];[FraMonths];2);"μ/η/αααα") & "#");0)=0;Null;DateSerial([cboEtos];[FraMonths];2))
κοκ.... όπου οι κόκκινοι αριθμοί είναι οι μέρες του μήνα.

Για να μην χρειαστεί να κάνεις όλη αυτή τη δουλειά χειροκίνητα σε 31 πεδία σου έστειλα τον κώδικα στο προηγούμενο μου μήνυμα.

Σου επισυνάπτω ένα αρχείο/παράδειγμα όπου χρωματίζονται τα πεδία εκείνα μόνο όταν υπάρχει η αντίστοιχη ημερομηνία ( στην περίπτωση μας 15/10/2012).

Φιλικά / Τάσος
Συνημμένα Αρχεία
Τύπος Αρχείου: mdb Παρουσιολόγιο.mdb (440,0 KB, 119 εμφανίσεις)
__________________
Ms-Office Development Team
Ανάπτυξη επαγγελματικών εφαρμογών
Απάντηση με παράθεση