
15-01-11, 19:31
|
| Όνομα: Γιώργος Έκδοση λογισμικού Office: Ms-Office 2010 Γλώσσα λογισμικού Office: Ελληνική, Αγγλική | | Εγγραφή: 18-06-2010
Μηνύματα: 3.674
| |
Καλησπέρα
Χρήστο, στη ΒΔ που επισυνάπτω υπάρχει μία υλοποίηση αυτού που ζητάς.
Στο σύνθετο πλαίσιο πρόσθεσα και μία επιλογή «ΟΛΟΙ» για να εμφανίζονται όλοι οι συναλλασσόμενοι.
Η λειτουργικότητα της φόρμας οφείλεται στον παρακάτω κώδικα Κώδικας: Private Sub cboFilter_AfterUpdate()
If Me.cboFilter = "<<ΟΛΟΙ>>" Then
Me.Filter = ""
Else
Me.Filter = "[ΣΧΕΣΗ]='" & Me.cboFilter & "'"
End If
Me.FilterOn = True
End Sub
Γιώργος
|