Forum

Forum (https://www.ms-office.gr/forum/)
-   Excel - Ερωτήσεις / Απαντήσεις (https://www.ms-office.gr/forum/excel-erotiseis-apantiseis/)
-   -   [VBA] Απόκλιση και συγχρόνως Ταξινόμηση (https://www.ms-office.gr/forum/excel-erotiseis-apantiseis/5375-apoklisi-kai-sygxronos-taksinomisi.html)

LEO 30-10-19 10:37

Απόκλιση και συγχρόνως Ταξινόμηση
 
1 Συνημμένο(α)
Καλημέρα σε όλο το Forum

Θα ήθελα την βοήθεια, σχετικά με το αρχείο που ανεβάζω.
Έχω 2 φύλλα (Υ & PY) με δεδομένα και θα ήθελα στο τρίτο φύλλο (Dif) να μπορέσω να βγάλω την διαφορά στο πεδίο Weight (Υ - PY) για τις πρώτες 10χώρες ταξινομημένες βάση της θετικής διαφοράς και αντίστοιχα τις 10χειροτερες αποδόσεις ανά Χώρα.

Ευχαριστώ εκ των προτέρων για το χρόνο σας.

kapetang 31-10-19 19:17

1 Συνημμένο(α)
Καλησπέρα

Για την εύρεση του ζητούμενου απαιτούνται οι διαφορές των βαρών P-PY.

Με άλλα λόγια για κάθε εγγραφή του φύλλου Υ θα πρέπει να βρούμε την αντίστοιχη εγγραφή του φύλλο ΡΥ και ακολούθως να βρούμε τη διαφορά των Weight (Y-PY).

Επειδή δε δίνεις στοιχεία για την αντιστοιχία των εγγραφών, έκανα κάποια υπόθεση, που ελπίζω να σε καλύπτει.

Με την παραδοχή που έκανα, μία εγγραφή του φύλλου Υ, δεν έχει αντίστοιχη στο φύλλο PY, με αποτέλεσμα η διαφορά βαρών να υπολογίζεται λάθος.

Περισσότερα στο συνημμένο.

LEO 01-11-19 10:37

1 Συνημμένο(α)
Γιώργο , καταρχάς σε ευχαριστώ πολύ για τον χρόνο σου.

Το ερώτημα είνα να μπορέσω να βγάλω τις διαφορές των βαρών Υ-PY συνολικά ανά Χώρα (StPC) και να τις ταξινομήσω βάση της μεγαλύτερης διαφοράς .

Στο DIF βλέπω ότι εμφανίζει τις αποκλίσεις ανά κωδικό(StP) καθώς επίσης και διπλές τιμές όπως κάτωθι :

a/a StPC Dif (Weight )
1 30930 #Δ/Υ
2 30707 60 *
3 30707 60 *

Επίσης υπάρχει μεγάλη πιθανότητα για κάθε εγγραφή του φύλλου Υ να μην βρούμε την αντίστοιχη εγγραφή του φύλλο ΡΥ και αντίστροφα.

Στο φύλλο dif υπάρχει ένα παράδειγμα με τυχαία δεδομένα ..

kapetang 01-11-19 19:45

1 Συνημμένο(α)
Καλησπέρα

Σωτήρη, δες στο συνημμένο, μια λύση με κώδικα.

Ελπίζω να σε καλύπτει.

LEO 04-11-19 11:40

1 Συνημμένο(α)
Γιώργο καλησπέρα και σε ευχαριστώ πολύ,

Το ζητούμενο όντως είναι αυτό που εμφανίζει στο Dif .Oταν όμως πήγα να το προσαρμόσω στα δικά μου δεδομένα δεν γέμιζε το Bottom10 . Προφανώς κάτι δεν κάνω σωστά.
Επίσης θα ήθελα αν είναι δυνατόν όταν κάνει τον υπολογισμό και την Ταξινόμηση να υπάρχει κάπου η δυνατότητα να επιλέγω τις για ποιές ομάδες θέλω να προβει σε υπολογίμό (στήλη item) ήτε όλες ήτε κάποιες από αυτές.

kapetang 04-11-19 18:11

1 Συνημμένο(α)
Καλησπέρα

Σωτήρη, δοκίμασε το συνημμένο.

Δεν έκανες κάτι λάθος. Εγώ ξέχασα τη γραμμή κώδικα: R = i

LEO 05-11-19 09:10

Γιώργο καλημέρα,

Σε ευχαριστώ πολύ για άλλη μια φορά. Λειτουργεί τέλεια !!

kapetang 05-11-19 09:34

Καλή συνέχεια Σωτήρη. Να είσαι καλά.

LEO 08-11-19 14:45

Γιώργο καλησπέρα και πάλι ,

Επειδή θέλω να κάνω μια τροποποίηση στο αρχείο και δεν γνωρίζω καθόλου από τον κώδικα θα ήθελα στην στήλη που προσθέτει τα ποσά καθώς και στην στήλη που είναι τα κριτήρια (items) να μπορώ να τα αλλάζω πχ αντί να προσθέτει την στήλη N στο συνημμένο να προσθέτει τα δεδομένα που υπάρχουν στην στήλη Q και να λαμβάνει ως κριτήρια(items) αντί την στήλη Α την στήλη C.
Σε ευχαριστώ και πάλι

kapetang 08-11-19 19:07

1 Συνημμένο(α)
Καλησπέρα

Σωτήρη, κάποιες ρυθμίσεις τις αφαίρεσα από τον κώδικα και τις έβαλα σε μία συγκεκριμένη θέση του φύλλου Diff.

Αφού τις συμπληρώσεις, σύμφωνα με τη διαμόρφωση των φύλλων Y και PY, κάνε δοκιμές πατώντας το κουμπί.


Η ώρα είναι 17:13.

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


Search Engine Optimization by vBSEO 3.3.2