Forum

Αναζήτηση στο ms-office.gr

Πάμε!

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

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

 

Εργαλεία Θεμάτων Τρόποι εμφάνισης
  #1  
Παλιά 09-02-12, 19:37
Όνομα: Χρήστος Φ.
Έκδοση λογισμικού Office: Ms-Office 2007
Γλώσσα λογισμικού Office: Ελληνική
 
Εγγραφή: 20-12-2010
Περιοχή: Θεσσαλονίκη
Μηνύματα: 500
Προεπιλογή Φίλτρο με ComboBox

Καλησπέρα στην παρέα του Forum.
Αφού επεξεργάστηκα ένα Θέμα που αφορούσε σε φίλτρο φόρμας με τη βοήθεια ComboBox, προσπάθησα να το αναπαραγάγω αλλά δεν τα καταφέρνω!
Πείτε μου σας παρακαλώ που έχω πρόβλημα;
__________________
Φιλικά, Χρήστος

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

Καλησπέρα

Χρήστο, στο κώδικα: αντί Me.Filter=True γράψε Me.FilterOn=True.

Καλό είναι, επίσης στη σχεδίαση να δώσεις για το σύνθετο πλαίσιο προεπιλεγμένη τιμή (Default Value) "ALL".

Φιλικά/Γιώργος
Απάντηση με παράθεση
  #3  
Παλιά 09-02-12, 21:10
Όνομα: Χρήστος Φ.
Έκδοση λογισμικού Office: Ms-Office 2007
Γλώσσα λογισμικού Office: Ελληνική
 
Εγγραφή: 20-12-2010
Περιοχή: Θεσσαλονίκη
Μηνύματα: 500
Προεπιλογή

Σ' ευχαριστώ....Δουλεύει!
__________________
Φιλικά, Χρήστος
Απάντηση με παράθεση
  #4  
Παλιά 09-02-12, 22:59
Το avatar του χρήστη Meteora
Συντονιστής
Όνομα: Νίκος
Έκδοση λογισμικού Office: Ms-Office 2007
Γλώσσα λογισμικού Office: Ελληνική
 
Εγγραφή: 28-12-2008
Περιοχή: Θεσσαλονίκη
Μηνύματα: 1.085
Προεπιλογή

Καλησπέρα

Έχω άσχημη εμπειρία με τη γραμμή me.Filter="". Δεν έχει δουλέψει ορισμένες φορές κυρίως σε εφαρμογές που μετέτρεψα το αρχείο σε *.accde και τρέχαν σε περιβάλλον AccessRuntime. Τελικά κατέληξα σε μια άλλη διαχείριση που σας παρουσιάζω.

Κώδικας:
Private Sub combo1_AfterUpdate()
    If Not  IsNull(Me.combo1) Then
        Me.Filter =  "Katigoriaid = " & Me.combo1
        Me.FilterOn = True
    Else    
       Me.FilterOn = False
    End If
End Sub
Καλό μας βράδυ

Νίκος Δ.
Απάντηση με παράθεση
Απάντηση στο θέμα

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

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

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


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

Θέμα Δημιουργός Forum Απαντήσεις Τελευταίο Μήνυμα
Cascading ComboBox Chris Access - Ερωτήσεις / Απαντήσεις 16 03-02-18 22:31
Ευρεία αναζήτηση σε Combobox intefix Access - Ερωτήσεις / Απαντήσεις 2 18-03-15 14:08
Combobox (NotList) gregory_m Visual Basic .NET 1 24-05-14 20:54
[VBA] ComboBox φίλτρο anestaki Excel - Ερωτήσεις / Απαντήσεις 15 17-02-14 22:22
[VBA] Σύγκριση τιμών ComboBox από το ίδιο το ComboBox. anestaki Excel - Ερωτήσεις / Απαντήσεις 4 08-02-13 13:49


Η ώρα είναι 20:11.