Φίλτρο Κώδικας

[kirillos]

καλημέρα σε όλους.
Θέλω να φτιάξω ένα φίλτρο σε ένα κουμπί που να κάνει ταξινόμηση σε στήλη από τον μεγαλύτερο αριθμό στον μικρότερο και ένα άλλο κουμπί που να κάνει σε μία άλλη το αντίθετο.
ευχαριστώ Χρήστος.

[Dangel82]

Μπορείς να βάλεις το παρακάτω στο διπλό κλικ κάποιου control ώστε με το ίδιο κουμπί να μπορείς να κάνεις την αντίθετη ταξινόμηση...
Δλδ, αν είναι αύξουσα η ταξινόμηση να εφαρμόσει την φθίνουσα και το ανάποδο...

 If Form.OrderBy = "afm" Then
        Form.OrderBy = "afm DESC"
    Else
        Form.OrderBy = "afm ASC"
    End If
    Me.OrderByOn = True

Ελπίζω να σου κάνει... .

[kapetang]

Καλησπέρα

Χρήστο, θα μπορούσες να προσαρμόσεις τον παρακάτω κώδικα.

Private Sub cmdOrderAsc_Click()
    'Ταξινόμηση αύξουσα   
    Me.OrderBy = "fName1"
    Me.OrderByOn = True
End Sub

Private Sub cmdOrderDesc_Click()
    'Ταξινόμηση φθίνουσα
    Me.OrderBy = "fName2 DESC"
    Me.OrderByOn = True
End Sub

Τα fName1 και fName2 είναι τα πεδία ταξινόμησης.

Φιλικά/Γιώργος

[kirillos]

Σας ευχαριστώ και τους δύο για τις απαντήσεις σας θα τις κοιτάξω και τις δύο, και πάλι ευχαριστώ.