Forum

Forum (https://www.ms-office.gr/forum/)
-   Access - Ερωτήσεις / Απαντήσεις (https://www.ms-office.gr/forum/access-erotiseis-apantiseis/)
-   -   Ταξινόμηση σε έκθεση (https://www.ms-office.gr/forum/access-erotiseis-apantiseis/2278-taksinomisi-se-ekthesi.html)

stavross 12-01-13 20:49
Ταξινόμηση σε έκθεση
 
καλησπέρα στο φόρουμ.
Παιδιά δεν ξέρω αν υπάρχει τρόπος.
Θέλω σε μία έκθεση να ταξινομήσω οχήματα αλλά όπως θέλω εγώ
Δηλαδή όχι αλφαβητικά
ΠΡΕΣ
ΦΟΡΤΗΓΟ 4
ΑΡΠΑ
ΚΟΝΤΕΙΝΕΡ 8
Και λοιπά
Ευχαριστώ εκ των προτέρων

Tasos 12-01-13 22:33
Καλησπέρα!

Σταύρο, στον πίνακα από όπου πηγάζουν τα δεδομένα της έκθεσης
πρόσθεσε ένα αριθμητικό πεδίο στο οποίο θα γράψεις τη σειρά εμφάνισης των οχημάτων όπως επιθυμείς.

Κατόπιν στην έκθεση κάνε ταξινόμηση αυτού του πεδίου .

Φιλικά

Τάσος

stavross 12-01-13 22:38
Το σκέφτηκα και εγώ Τάσο αλλά για να μην παραφορτώνω τον πίνακα επειδή έχω πολλά πεδία έλεγα μήπως υπήρχε κάτι άλλο.
Πάντως ευχαριστώ
Φιλικά Σταύρος

kapetang 13-01-13 09:45
1 Συνημμένο(α)
Καλημέρα

Σταύρο, αν δε θέλεις να χρησιμοποιήσεις την απλή λύση που πρότεινε ο Τάσος, θα μπορούσες:

1) Να δημιουργήσεις μία συνάρτηση όπως η παρακάτω
Κώδικας:
Public Function CustomOrder(X As String) As Long
    Select Case X
        Case "ΠΡΕΣ": CustomOrder = 1
        Case "ΦΟΡΤΗΓΟ 4": CustomOrder = 2
        Case "ΑΡΠΑ": CustomOrder = 3
        Case "ΚΟΝΤΕΙΝΕΡ 8": CustomOrder = 4
    End Select
End Function
2) Να χρησιμοποιήσεις τη συνάρτηση αυτή για την ταξινόμηση.

Αυτό μπορεί να γίνει είτε με τη βοήθεια ερωτήματος (SortCars) είτε και απευθείας στην έκθεση (rprCars).

Δες τη ΒΔ που επισυνάπτω

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

stavross 13-01-13 11:16
Γιώργο ευχαριστώ για την ζωγραφιά.
Αυτό ακριβώς ήθελα με την συνάρτηση
Φιλικά Σταύρος


Η ώρα είναι 10:46.

Ms-Office.gr - ©2000 - 2026, Jelsoft Enterprises Ltd.


Search Engine Optimization by vBSEO 3.3.2