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

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

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

 

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

Καλησπέρα στην παρέα
Ζήλεψα τον Άγγελο!!!
Έτσι στη βάση που επισυνάπτω έχουμε τη δυνατότητα να δούμε στη φόρμα όλους τους πελάτες, μόνο τους ενεργούς ή μόνο τους ανενεργούς.
Η δουλειά γίνεται με τον κώδικα.
Κώδικας:
Private Sub optFilter_Click()
    Me.Filter = Choose(optFilter.Value, "", "[Active]= -1", "[Active]=0")
    Me.FilterOn = True
End Sub
Φιλικά/Γιώργος
Συνημμένα Αρχεία
Τύπος Αρχείου: mdb accApplyFilter.mdb (152,0 KB, 38 εμφανίσεις)
Απάντηση με παράθεση
  #2  
Παλιά 02-10-10, 06:33
Όνομα: Χρήστος
Έκδοση λογισμικού Office: Ms-Office 2010
Γλώσσα λογισμικού Office: Ελληνική
 
Εγγραφή: 24-01-2010
Περιοχή: Φλώρινα
Μηνύματα: 164
Προεπιλογή

Παράθεση:
Αρχική Δημοσίευση από kapetang Εμφάνιση μηνυμάτων
Καλησπέρα στην παρέα
Ζήλεψα τον Άγγελο!!!
Έτσι στη βάση που επισυνάπτω έχουμε τη δυνατότητα να δούμε στη φόρμα όλους τους πελάτες, μόνο τους ενεργούς ή μόνο τους ανενεργούς.
Η δουλειά γίνεται με τον κώδικα.
Κώδικας:
Private Sub optFilter_Click()
    Me.Filter = Choose(optFilter.Value, "", "[Active]= -1", "[Active]=0")
    Me.FilterOn = True
End Sub
Φιλικά/Γιώργος
Γιώργο νομίζω πώς το παράδειγμα σου παθαίνει ένα black out στην αρχή..
Δηλαδή με το που ξεκινώ την εφαρμογή (παράδειγμα) δείχνη 2 στο (ΟΛΟΙ)
Πατάω το (ΕΝΕΡΓΟΙ) πάλι 2 (ΑΝΕΝΕΡΓΟΙ) 3

Για να γίνω πιο σαφής πρέπει να πατήσουμε κάποιο άλλο πλήκτρο από το (ΟΛΟΙ)
και κατόπιν πάλι το (ΟΛΟΙ) ώστε να υπολογίση σωστα και τους 5, με την εκίνηση δεν τους υπολογίζει σαν (ΟΛΟΙ) αλλά μάλλον σαν ενεργούς αφου εμφανίζει 2..
Απάντηση με παράθεση
  #3  
Παλιά 02-10-10, 07:39
Όνομα: Γιώργος
Έκδοση λογισμικού Office: Ms-Office 2010
Γλώσσα λογισμικού Office: Ελληνική, Αγγλική
 
Εγγραφή: 18-06-2010
Μηνύματα: 3.674
Προεπιλογή

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

Χρήστο άνοιξα τη βάση όπως είναι στο φόρουμ και δεν παρουσίασε το πρόβλημα.
Αν εμφανίζεται σε κάποια δοκιμή δική σου μάλλον οφείλεται σε λανθασμένη προεπιλεγμένη τιμή της ομάδας επιλογών (optFilter).
Πιστεύω ότι θα λυθεί αν βάλεις προεπιλεγμένη τιμή 1 (προβολή σχεδίασης > ιδιότητες ομάδας επιλογών > δεδομένα > προεπιλεγμένη τιμή > 1).
Τα ξαναλέμε

Φιλικά/Γιώργος
Απάντηση με παράθεση
  #4  
Παλιά 02-10-10, 19:55
Όνομα: Χρήστος
Έκδοση λογισμικού Office: Ms-Office 2010
Γλώσσα λογισμικού Office: Ελληνική
 
Εγγραφή: 24-01-2010
Περιοχή: Φλώρινα
Μηνύματα: 164
Προεπιλογή

Γιώργο δεν είναι θέμα επιλογής..

Οπως την κατεβάζω την ανοίγω και μου δείχνει τα άτομα κάτω 1 από 2 ενώ ειναι πατημένο το κουμπί (ΟΛΟΙ) και δεν έχω πειράξει τίποτα...
Εφόσον πατήσης οποιοδήποτε άλλο κουμπί και μετά ξαναπατήσεις το (ΟΛΟΙ) δείχνη 1 από 5..

Δεν ξέρω μήπως κάνω κάτι λάθος, αλλά δεν κάνω και τίποτα...
Απάντηση με παράθεση
  #5  
Παλιά 02-10-10, 21:22
Όνομα: Γιώργος
Έκδοση λογισμικού Office: Ms-Office 2010
Γλώσσα λογισμικού Office: Ελληνική, Αγγλική
 
Εγγραφή: 18-06-2010
Μηνύματα: 3.674
Προεπιλογή

Χρήστο άνοιξέ την χωρίς να την κατεβάσεις και πες μου πως δουλεύει.
Επίσης ανέβασε τη βάση όπως την αποθήκευσες στον υπολογιστή σου, μήπως βγει άκρη
Απάντηση με παράθεση
  #6  
Παλιά 03-10-10, 06:21
Όνομα: Χρήστος
Έκδοση λογισμικού Office: Ms-Office 2010
Γλώσσα λογισμικού Office: Ελληνική
 
Εγγραφή: 24-01-2010
Περιοχή: Φλώρινα
Μηνύματα: 164
Προεπιλογή

Αυτο το αρχείο κατεβάζω το τρέχω και κατευθειαν εμφανιζει 1/2 στο ολοι...
Συνημμένα Αρχεία
Τύπος Αρχείου: mdb accApplyFilter_Xristos.mdb (228,0 KB, 30 εμφανίσεις)
Απάντηση με παράθεση
  #7  
Παλιά 30-09-10, 18:46
Super Moderator
Όνομα: Αγγελος
Έκδοση λογισμικού Office: Ms-Office 2003, Ms-Office 2007
Γλώσσα λογισμικού Office: Ελληνική, Αγγλική
 
Εγγραφή: 29-04-2010
Μηνύματα: 111
Προεπιλογή

Νομίζω οτι το θέμα απλά ξεχυλώθηκε!!!
__________________
Always Look on the Bright Side of Life!
Απάντηση με παράθεση
  #8  
Παλιά 30-09-10, 19:28
Το avatar του χρήστη Meteora
Συντονιστής
Όνομα: Νίκος
Έκδοση λογισμικού Office: Ms-Office 2007
Γλώσσα λογισμικού Office: Ελληνική
 
Εγγραφή: 28-12-2008
Περιοχή: Θεσσαλονίκη
Μηνύματα: 1.033
Προεπιλογή

Γιώργο Μπράβο !
Να σε ευχαριστήσω για την προσφορά και του κώδικα αλλά και για την 'Ομάδα επιλογών' με τα 'κουμπιά εναλλαγής'. Ήδη τοποθέτησα το ε κ π λ η κ τ ι κ ό υλικό στην βιβλιοθήκη μου...
Καλό σου βράδυ / Νίκος Δ.
Απάντηση με παράθεση
  #9  
Παλιά 30-09-10, 19:02
Όνομα: Γιώργος
Έκδοση λογισμικού Office: Ms-Office 2010
Γλώσσα λογισμικού Office: Ελληνική, Αγγλική
 
Εγγραφή: 18-06-2010
Μηνύματα: 3.674
Προεπιλογή

Είναι μια άποψη που κρίνεται από όλους!!!
Απάντηση με παράθεση
  #10  
Παλιά 30-09-10, 19:34
Όνομα: Γιώργος
Έκδοση λογισμικού Office: Ms-Office 2010
Γλώσσα λογισμικού Office: Ελληνική, Αγγλική
 
Εγγραφή: 18-06-2010
Μηνύματα: 3.674
Προεπιλογή

Φίλε Νίκο ευχαριστώ. Επίσης καλό βράδυ
Απάντηση με παράθεση
Απάντηση στο θέμα

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

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

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


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

Θέμα Δημιουργός Forum Απαντήσεις Τελευταίο Μήνυμα
[ Φόρμες ] Εμφάνιση μηνύματος σε εντοπισμό ίδιων εγγραφών (σε φόρμα με διάταξη πίνακα) dimitrisp Access - Ερωτήσεις / Απαντήσεις 2 16-03-16 21:20
[ Φόρμες ] Κλείδωμα συγκεκριμένων εγγραφών σε φόρμα ΤΙΜΟΣ Access - Ερωτήσεις / Απαντήσεις 4 10-12-15 16:47
[Συναρτήσεις] εμφάνιση με vlookup συγκεκριμένων κελιών pierta Excel - Ερωτήσεις / Απαντήσεις 10 25-10-15 11:56
Αυτόματη εμφάνιση εγγραφών σε φόρμα Access balex Access - Ερωτήσεις / Απαντήσεις 8 16-07-10 18:18
[ Φόρμες ] Εμφάνιση συνόλων υποφόρμας στην κύρια φόρμα mdragon Access - Ερωτήσεις / Απαντήσεις 5 14-04-10 10:01


Η ώρα είναι 02:22.