Πώς να φιλτράρετε τα δεδομένα στο Excel χρησιμοποιώντας VBA

Σε αυτό το άρθρο, θα μάθουμε πώς να φιλτράρουμε τα δεδομένα και στη συνέχεια πώς μπορούμε να δώσουμε τα διαφορετικά κριτήρια φιλτραρίσματος χρησιμοποιώντας το VBA στο Microsoft Excel 2007 και νεότερη έκδοση.

Πώς να βάλετε το φίλτρο στα δεδομένα;

Για να καταλάβετε πώς να τοποθετήσετε το φίλτρο, ας πάρουμε ένα παράδειγμα:-

Έχουμε δεδομένα στο εύρος A1: E35 στο οποίο η στήλη A περιέχει μήνα, στήλη Β σελίδα, στήλη C κλικ, στήλη D CTR και στήλη Ε περιέχει μέση θέση.

Αν θέλουμε να δούμε τα δεδομένα του μήνα Ιανουαρίου, τότε πρέπει να βάλουμε το φίλτρο τον Ιανουάριο μήνα. Για να βάλετε το φίλτρο μέσω VBA, ακολουθήστε τα παρακάτω βήματα:-

Ανοίξτε τη σελίδα VBA πατήστε το πλήκτρο Alt+F11.
Εισαγάγετε μια ενότητα.
Γράψτε τον παρακάτω κωδικό:

Sub Filterindata ()

Εύρος ("A1"). AutoFilter Field: = 1, Criteria1: = "Jan"

Τέλος υπο

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

Για να εκτελέσετε τη μακροεντολή, πατήστε το πλήκτρο F5 και τα δεδομένα θα φιλτραριστούν και μπορούμε να δούμε μόνο δεδομένα Jan.

Πώς να τοποθετήσετε το φίλτρο για τα 10 κάτω στοιχεία;

Για να καταλάβετε πώς να τοποθετήσετε το φίλτρο για τα 10 κάτω στοιχεία, ας πάρουμε ένα παράδειγμα:-

Εάν θέλουμε να δούμε τα 10 κάτω κλικ στα δεδομένα, τότε πρέπει να ακολουθήσουμε τα παρακάτω βήματα:-

Ανοίξτε τη σελίδα VBA πατήστε το πλήκτρο Alt+F11.
Εισαγάγετε μια ενότητα.
Γράψτε τον παρακάτω κωδικό:

Sub filterbottom10 ()

Εύρος ("A1"). Πεδίο αυτόματου φίλτρου: = 3, Κριτήρια1: = "10", Χειριστής: = xlBottom10Items

Τέλος υπο

Επεξήγηση κώδικα:- Αρχικά, πρέπει να επιλέξουμε το εύρος των δεδομένων όπου θέλουμε να βάλουμε το φίλτρο και στη συνέχεια πρέπει να καθορίσουμε τα κριτήρια για το φιλτράρισμα των δεδομένων των 10 κάτω στοιχείων.

Για να εκτελέσετε τη μακροεντολή, πατήστε το πλήκτρο F5 και τα δεδομένα θα φιλτραριστούν και μπορούμε να δούμε μόνο τα δεδομένα κλικ 10 κάτω.

Πώς να τοποθετήσετε το φίλτρο για το κάτω 10 τοις εκατό των δεδομένων;

Για να καταλάβετε πώς να τοποθετήσετε το φίλτρο για το κάτω 10 % των δεδομένων, ας πάρουμε ένα παράδειγμα:-

Εάν θέλουμε να δούμε τα κάτω 10 % των δεδομένων, τότε πρέπει να ακολουθήσουμε τα παρακάτω βήματα:-

Ανοίξτε τη σελίδα VBA και πατήστε το πλήκτρο Alt+F11.
Εισαγάγετε μια ενότητα.
Γράψτε τον παρακάτω κωδικό:

Sub Filterbottom10percent ()

Εύρος ("A1"). Πεδίο αυτόματου φίλτρου: = 3, Κριτήρια1: = "10", Χειριστής: = xlBottom10Percent

Τέλος υπο

Για να εκτελέσετε τη μακροεντολή, πατήστε το πλήκτρο F5 και τα δεδομένα θα φιλτραριστούν και μπορούμε να δούμε μόνο τα κάτω 10 % των δεδομένων.

Πώς να τοποθετήσετε το φίλτρο για τον κάτω Χ αριθμό στοιχείων δεδομένων;

Για να καταλάβετε πώς να τοποθετήσετε το φίλτρο για τους αριθμούς κάτω Χ, ας πάρουμε ένα παράδειγμα:-

Αν θέλουμε να δούμε τον κάτω αριθμό των δεδομένων, τότε πρέπει να ακολουθήσουμε τα παρακάτω βήματα:-

Ανοίξτε τη σελίδα VBA πατήστε το πλήκτρο Alt+F11.
Εισαγάγετε μια ενότητα.
Γράψτε τον παρακάτω κωδικό:

Sub Filterbottomxnumber ()

Εύρος ("A1"). Πεδίο αυτόματου φίλτρου: = 3, Κριτήρια1: = "5", Χειριστής: = xlBottom10Items

Τέλος υπο

Επεξήγηση κώδικα:- Αρχικά επιλέξαμε το εύρος δεδομένων όπου θέλουμε να βάλουμε το φίλτρο και έπειτα δώσαμε τα κριτήρια για να φιλτράρουμε τους 5 αριθμούς των κάτω 10 αριθμών.

Για να εκτελέσετε τη μακροεντολή, πατήστε το πλήκτρο F5, τα δεδομένα θα φιλτραριστούν και μπορούμε να δούμε μόνο τα δεδομένα του κλικ κάτω από το 10.

Πώς να τοποθετήσετε το φίλτρο για το κάτω x ποσοστό των δεδομένων;

Για να καταλάβετε πώς να τοποθετήσετε το φίλτρο για το κάτω x ποσοστό των δεδομένων, ας πάρουμε ένα παράδειγμα:-

Έχουμε δεδομένα στο εύρος A1: E35, στο οποίο η στήλη A περιέχει μήνα, στήλη Β σελίδα, στήλη C κλικ, στήλη D CTR και η στήλη Ε περιέχει μέση θέση.

Εάν θέλουμε να δούμε τα κάτω x ποσοστά δεδομένων, τότε πρέπει να ακολουθήσουμε τα παρακάτω βήματα:-

Ανοίξτε τη σελίδα VBA πατήστε το πλήκτρο Alt+F11.
Εισαγάγετε μια ενότητα.
Γράψτε τον παρακάτω κωδικό:

Sub Filterbottomxpercent ()

Εύρος ("A1"). Πεδίο AutoFilter: = 3, Criteria1: = "5", Operator: = xlBottom10Percent

Τέλος υπο

Επεξήγηση κώδικα:- Πρώτα πρέπει να επιλέξουμε το εύρος των δεδομένων όπου θέλουμε να βάλουμε το φίλτρο και στη συνέχεια πρέπει να καθορίσουμε τα κριτήρια για το φιλτράρισμα των δεδομένων του κατώτατου τοις εκατό.

Πώς να τοποθετήσετε το φίλτρο για συγκεκριμένο κείμενο;

Για να καταλάβετε πώς να τοποθετήσετε το φίλτρο για συγκεκριμένα, ας πάρουμε ένα παράδειγμα:-

Εάν θέλουμε να δούμε τα συγκεκριμένα δεδομένα μόνο στη στήλη Β, τότε πρέπει να ακολουθήσουμε τα παρακάτω βήματα:-

Ανοίξτε τη σελίδα VBA και πατήστε το πλήκτρο Alt+F11.
Εισαγάγετε μια ενότητα.
Γράψτε τον παρακάτω κωδικό:

Υποπροσδιορισμένα δεδομένα ()

Εύρος ("A1"). Πεδίο αυτόματου φίλτρου: = 2, Κριτήρια1: = "*Συμβουλή Excel*"

Τέλος υπο

Επεξήγηση κώδικα:- Αρχικά έχουμε επιλέξει το εύρος δεδομένων όπου θα ορίσουμε τη στήλη Β στο Πεδίο ως 2 και στη συνέχεια θα ορίσουμε αυτά που δεδομένα θέλουμε να δούμε.

Για να εκτελέσετε τη μακροεντολή πατήστε το πλήκτρο F5, τα δεδομένα θα φιλτραριστούν και μπορούμε να δούμε μόνο τα δεδομένα του Exceltip.

Πώς να βάλετε το φίλτρο για πολλαπλά κριτήρια;

Για να καταλάβετε πώς να τοποθετήσετε συγκεκριμένα το φίλτρο, ας πάρουμε ένα παράδειγμα:-

Εάν θέλουμε να δούμε τα δεδομένα για τον Ιανουάριο και τον Μάρτιο, τότε πρέπει να ακολουθήσουμε τα παρακάτω βήματα:-

Ανοίξτε τη σελίδα VBA πατήστε το πλήκτρο Alt+F11.
Εισαγάγετε μια ενότητα.
Γράψτε τον παρακάτω κωδικό:

Sub Multipledata ()

Εύρος ("A1: E1"). Πεδίο AutoFilter: = 1, Criteria1: = "Jan", Operator: = xlAnd, Criteria2: = "Mar"

Τέλος υπο

Επεξήγηση κώδικα:- Πρώτα πρέπει να επιλέξουμε το εύρος δεδομένων όπου θα ορίσουμε τη στήλη Α στο πεδίο ως 1 και στη συνέχεια θα ορίσουμε και τα δύο κριτήρια.

Για να εκτελέσετε τη μακροεντολή, πατήστε το πλήκτρο F5 και τα δεδομένα θα φιλτραριστούν και μπορούμε να δούμε μόνο τα δεδομένα Ιαν και Μαρ.

Πώς να βάλετε το φίλτρο να εμφανίζει τις εγγραφές που περιέχουν μια τιμή μεταξύ 2 τιμών;

Για να καταλάβετε πώς να τοποθετήσετε το φίλτρο για πολλά κριτήρια, ας πάρουμε ένα παράδειγμα:-

Εάν θέλουμε να βάλουμε το φίλτρο σύμφωνα με τα κριτήρια πόσοι αριθμοί έχουμε κάτω από τα κλικ από 5000 έως 10000, ακολουθήστε τα παρακάτω βήματα:-

Ανοίξτε τη σελίδα VBA και πατήστε το πλήκτρο Alt+F11.
Εισαγάγετε μια ενότητα.
Γράψτε τον παρακάτω κωδικό:

Sub MultipleCriteria ()

Εύρος ("A1: E1"). Πεδίο AutoFilter: = 3, Criteria1: = "> 5000", Operator: = xlAnd, Criteria2: = "<10000"

Τέλος υπο

Επεξήγηση κώδικα: - Πρώτα πρέπει να επιλέξουμε το εύρος δεδομένων όπου θα καθορίσουμε τα κριτήρια στη στήλη C χρησιμοποιώντας τη συνάρτηση τελεστή.

Για να εκτελέσετε τη μακροεντολή, πατήστε το πλήκτρο F5 και τα δεδομένα θα φιλτραριστούν και θα δούμε τα δεδομένα σύμφωνα με τα κλικ που είναι περισσότερα από 5000 και λιγότερα από 10000.

Πώς να τοποθετήσετε το φίλτρο πολλαπλών κριτηρίων σε πολλές στήλες;

Για να καταλάβετε πώς να τοποθετήσετε το φίλτρο για πολλά κριτήρια σε πολλές στήλες, ας πάρουμε ένα παράδειγμα:-

Αν θέλουμε να βάλουμε το φίλτρο τον Ιανουάριο για να δούμε πόσοι σύνδεσμοι υπάρχουν σε συμβουλές excel Έτσι πρέπει να βάλουμε το φίλτρο στη στήλη Α και Β, ακολουθήστε τα παρακάτω βήματα:-

Ανοίξτε τη σελίδα VBA πατήστε το πλήκτρο Alt+F11.
Εισαγάγετε μια ενότητα.
Γράψτε τον παρακάτω κωδικό:

Sub MultipleFields ()

Εύρος ("A1: E1"). Πεδίο AutoFilter: = 1, Criteria1: = "Jan"

Εύρος ("A1: E1"). Πεδίο AutoFilter: = 2, Criteria1: = "*Exceltip*"

Τέλος υπο

Επεξήγηση κώδικα: - Πρώτον, πρέπει να επιλέξουμε το εύρος δεδομένων όπου θέλουμε να βάλουμε το φίλτρο και στη συνέχεια θα πρέπει να καθορίσουμε τα κριτήρια 2 φορές για να επιτύχουμε τον στόχο.

Για να εκτελέσετε τη μακροεντολή, πατήστε το πλήκτρο F5 και τα δεδομένα θα φιλτραριστούν και θα δούμε πόσοι σύνδεσμοι ανήκουν στο Exceltip στα δεδομένα του Ιανουαρίου.

Πώς να φιλτράρετε τα δεδομένα χωρίς να εφαρμόσετε το βέλος φίλτρου;

Για να καταλάβετε πώς να φιλτράρετε τα δεδομένα χωρίς να εφαρμόσετε το φίλτρο στη στήλη, ας πάρουμε ένα παράδειγμα:-

Εάν θέλουμε να βάλουμε το φίλτρο για τον Ιανουάριο μήνα και να κρύψουμε το βέλος του φίλτρου στο πεδίο, ακολουθήστε τα παρακάτω βήματα:-

Ανοίξτε τη σελίδα VBA πατήστε το πλήκτρο Alt+F11.
Εισαγάγετε μια ενότητα.
Γράψτε τον παρακάτω κωδικό:

Sub HideFilter ()

Εύρος ("A1"). Πεδίο αυτόματου φίλτρου: = 1, Κριτήρια1: = "Ιαν", ορατό dropdown: = Λάθος

Τέλος υπο

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

Για να εκτελέσετε τη μακροεντολή, πατήστε το πλήκτρο F5 και τα δεδομένα θα φιλτραριστούν. Τώρα, μπορούμε να δούμε τα δεδομένα μόνο στα δεδομένα του Ιανουαρίου, αλλά το βέλος φίλτρου δεν θα εμφανιστεί στη στήλη του μήνα.

Πώς να φιλτράρετε τα δεδομένα για την εμφάνιση των 1 0r 2 Πιθανές τιμές;

Για να καταλάβετε πώς να φιλτράρετε τα δεδομένα για να εμφανίσετε τις 1 ή 2 πιθανές τιμές, ας πάρουμε ένα παράδειγμα:-

Αν θέλουμε να βάλουμε το φίλτρο τον Ιανουάριο και να κρύψουμε το βέλος του φίλτρου στο πεδίο, πρέπει να ακολουθήσουμε τα παρακάτω βήματα:-

Ανοίξτε τη σελίδα VBA πατήστε το πλήκτρο Alt+F11.
Εισαγάγετε μια ενότητα.
Γράψτε τον παρακάτω κωδικό:

Sub HideFilter ()

Εύρος ("A1"). Πεδίο αυτόματου φίλτρου: = 1, Κριτήρια1: = "Ιαν", ορατό dropdown: = Λάθος

Τέλος υπο

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

Για να εκτελέσετε τη μακροεντολή, πατήστε το πλήκτρο F5 και τα δεδομένα θα φιλτραριστούν. Τώρα, μπορούμε να δούμε τα δεδομένα στα δεδομένα του μήνα Ιανουαρίου και τα δεδομένα του μήνα Φεβρουαρίου.

Πώς να τοποθετήσετε το φίλτρο για τα 10 κορυφαία αντικείμενα;

Για να καταλάβετε πώς να τοποθετήσετε το φίλτρο για τα 10 κορυφαία στοιχεία, ας πάρουμε ένα παράδειγμα:-

Αν θέλουμε να δούμε τα 10 πρώτα κλικ στα δεδομένα, τότε πρέπει να ακολουθήσουμε τα παρακάτω βήματα:-

Ανοίξτε τη σελίδα VBA και πατήστε το πλήκτρο Alt+F11.
Εισαγάγετε μια ενότητα.
Γράψτε τον παρακάτω κωδικό:

Sub filtertop10 ()

Εύρος ("A1"). Πεδίο AutoFilter: = 3, Criteria1: = "10", Operator: = xlTop10Items

Τέλος υπο

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

Για να εκτελέσετε τη μακροεντολή, πατήστε το πλήκτρο F5 και τα δεδομένα θα φιλτραριστούν και μπορούμε να δούμε μόνο τα δεδομένα των 10 κορυφαίων κλικ.

Πώς να τοποθετήσετε το φίλτρο για το 10 % των δεδομένων;

Για να καταλάβετε πώς να τοποθετήσετε το φίλτρο για το 10 % των δεδομένων, ας πάρουμε ένα παράδειγμα:-

Αν θέλουμε να δούμε τα κορυφαία 10 τοις εκατό δεδομένα, τότε πρέπει να ακολουθήσουμε τα παρακάτω βήματα:-

Ανοίξτε τη σελίδα VBA πατήστε το πλήκτρο Alt+F11.
Εισαγάγετε μια ενότητα.
Γράψτε τον παρακάτω κωδικό:

Sub Filtertop10percent ()

Εύρος ("A1"). Πεδίο αυτόματου φίλτρου: = 3, Κριτήρια1: = "10", Χειριστής: = xlTop10Percent

Τέλος υπο

Επεξήγηση κώδικα:- Πρώτα πρέπει να επιλέξουμε το εύρος των δεδομένων όπου θέλουμε να βάλουμε το φίλτρο και μετά πρέπει να ορίσουμε τα κριτήρια για το φιλτράρισμα των δεδομένων από το 10 %.

Για να εκτελέσετε τη μακροεντολή, πατήστε το πλήκτρο F5 και τα δεδομένα θα φιλτραριστούν. Τώρα, μπορούμε να δούμε μόνο τα κορυφαία 10 τοις εκατό δεδομένα.