Πώς να ενημερώσετε αυτόματα το προηγμένο αποτέλεσμα φίλτρου στο Excel;
Όταν εφαρμόζουμε τη λειτουργία Advanced Filter, θα διαπιστώσουμε ότι το φιλτραρισμένο αποτέλεσμα δεν θα αλλάξει αυτόματα με την αλλαγή των κριτηρίων. Αυτό μας χρειάζεται να εφαρμόσουμε τη λειτουργία Advanced Filter για άλλη μια φορά για να λάβουμε το νέο αποτέλεσμα. Ωστόσο, έχετε κάποιο καλό και γρήγορο τέχνασμα για την αυτόματη ενημέρωση του αποτελέσματος του σύνθετου φίλτρου όπως ακολουθεί το στιγμιότυπο οθόνης που εμφανίζεται στο Excel;
Ενημερώστε αυτόματα το προηγμένο αποτέλεσμα φίλτρου με τον κώδικα VBA
Ενημερώστε αυτόματα το προηγμένο αποτέλεσμα φίλτρου με τον κώδικα VBA
Ο παρακάτω κώδικας VBA μπορεί να σας βοηθήσει να ενημερώσετε αυτόματα το προηγμένο αποτέλεσμα φίλτρου όταν αλλάξετε τα κριτήρια όπως χρειάζεστε, κάντε το εξής:
1. Κάντε δεξί κλικ στην καρτέλα φύλλων που θέλετε να φιλτράρετε αυτόματα τα δεδομένα και, στη συνέχεια, επιλέξτε Προβολή κωδικού από το μενού περιβάλλοντος, στο ανοιχτό Microsoft Visual Basic για εφαρμογές παράθυρο, αντιγράψτε και επικολλήστε τον ακόλουθο κώδικα στην κενή ενότητα:
Κωδικός VBA: Ενημέρωση αυτόματου αποτελέσματος φίλτρου αυτόματα:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Range("A5:D21").AdvancedFilter Action:=xlFilterInPlace, CriteriaRange:=Range _
("A1:C3"), Unique:=False
End Sub
Note: Στον παραπάνω κωδικό: Α5: Δ21 είναι το εύρος δεδομένων που θέλετε να φιλτράρετε, Α1: Γ3 είναι το εύρος κριτηρίων για φιλτράρισμα βάσει.
2. Στη συνέχεια, αποθηκεύστε και κλείστε το παράθυρο κώδικα, τώρα, όταν αλλάξετε τα κριτήρια στο εύρος κριτηρίων, το φιλτραρισμένο αποτέλεσμα θα ενημερωθεί αυτόματα ταυτόχρονα.
Τα καλύτερα εργαλεία παραγωγικότητας γραφείου
Αυξήστε τις δεξιότητές σας στο Excel με τα Kutools για Excel και απολαύστε την αποτελεσματικότητα όπως ποτέ πριν. Το Kutools για Excel προσφέρει πάνω από 300 προηγμένες δυνατότητες για την ενίσχυση της παραγωγικότητας και την εξοικονόμηση χρόνου. Κάντε κλικ εδώ για να αποκτήσετε τη δυνατότητα που χρειάζεστε περισσότερο...
Το Office Tab φέρνει τη διεπαφή με καρτέλες στο Office και κάνει την εργασία σας πολύ πιο εύκολη
- Ενεργοποίηση επεξεργασίας και ανάγνωσης καρτελών σε Word, Excel, PowerPoint, Publisher, Access, Visio και Project.
- Ανοίξτε και δημιουργήστε πολλά έγγραφα σε νέες καρτέλες του ίδιου παραθύρου και όχι σε νέα παράθυρα.
- Αυξάνει την παραγωγικότητά σας κατά 50% και μειώνει εκατοντάδες κλικ του ποντικιού για εσάς κάθε μέρα!