Αναζήτηση και επισήμανση αποτελεσμάτων αναζήτησης στο Excel

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

Αναζήτηση και επισήμανση αποτελεσμάτων αναζήτησης με τον κωδικό VBA

Αναζήτηση και επισήμανση αποτελεσμάτων αναζήτησης με τη μορφοποίηση υπό όρους

Αναζητήστε και επισημάνετε τα αποτελέσματα αναζήτησης με ένα εύχρηστο εργαλείο

Στο Excel, υπάρχει ένας κωδικός VBA που μπορεί να σας βοηθήσει να αναζητήσετε μια τιμή και, στη συνέχεια, να επισημάνετε τα αποτελέσματα αναζήτησης.

1. Ενεργοποιήστε το φύλλο που θέλετε να αναζητήσετε και επισημάνετε τα αποτελέσματα, πατήστε Alt + F11 κλειδιά για άνοιγμα Microsoft Visual Basic για εφαρμογές παράθυρο.

2. κλικ Κύριο θέμα > Μονάδα μέτρησηςκαι επικολλήστε τον παρακάτω κώδικα στη νέα ενότητα.

VBA: Επισημάνετε τα αποτελέσματα αναζήτησης

Sub FindRange()
'UpdatebyExtendoffice20190813
Dim xRg As Range
Dim xFRg As Range
Dim xStrAddress As String
Dim xVrt As Variant
xVrt = Application.InputBox(prompt:="Search:", Title:="www.extendoffice.com")
If xVrt <> "" Then
Set xFRg = ActiveSheet.Cells.Find(what:=xVrt)
If xFRg Is Nothing Then
MsgBox prompt:="Cannot find this value", Title:="www.extendoffice.com"
Exit Sub
End If
xStrAddress = xFRg.Address
Set xRg = xFRg
Do
Set xFRg = ActiveSheet.Cells.FindNext(After:=xFRg)
Set xRg = Application.Union(xRg, xFRg)
Loop Until xFRg.Address = xStrAddress
If xRg.Count > 0 Then
xRg.Interior.ColorIndex = 8
xRsp = MsgBox(prompt:="Do you want to cancel highlighting?", Title:="www.extendoffice.com", Buttons:=vbQuestion + vbOKCancel)

If xRsp = vbOK Then xRg.Interior.ColorIndex = xlNone
End If
End If
End Sub

3. Τύπος F5 κλειδί και, στη συνέχεια, εμφανίζεται ένα πλαίσιο αναζήτησης για να πληκτρολογήσετε την καθορισμένη τιμή που αναζητάτε.

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

Note:

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

2. Αυτό το VBA λειτουργεί για ολόκληρο το ενεργό φύλλο και χωρίς διάκριση πεζών-κεφαλαίων.

Θέλετε να αυξήσετε τις πληρωμές και πολύ χρόνο για να συνοδεύσετε την οικογένεια; Η καρτέλα του Office βελτιώνει την αποτελεσματικότητά σας κατά 50% στο Microsoft Office που λειτουργεί τώρα Απίστευτο, η εργασία σε δύο ή περισσότερα έγγραφα είναι ευκολότερη και ταχύτερη από την εργασία σε ένα. Σε σύγκριση με γνωστά προγράμματα περιήγησης, το εργαλείο καρτελών στο Office Tab είναι πιο ισχυρό και πιο αποτελεσματικό. Μειώστε εκατοντάδες κλικ του ποντικιού και πληκτρολογώντας πληκτρολόγιο κάθε μέρα για εσάς, πείτε αντίο στο χέρι του ποντικιού τώρα. Εάν συνήθως εργάζεστε σε πολλά έγγραφα, η καρτέλα του Office θα είναι μια εξαιρετική εξοικονόμηση χρόνου για εσάς. 30- δωρεάν δοκιμή ημέρας, δεν απαιτείται πιστωτική κάρτα. Δείτε ΠερισσότεραΔωρεάν Λήψη Τώρα

Στο Excel, η συνάρτηση μορφοποίησης υπό όρους μπορεί επίσης να επισημάνει αυτόματα τα αποτελέσματα αναζήτησης.

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

1. Επιλέξτε το εύρος στο οποίο θέλετε να αναζητήσετε και κάντε κλικ στο Αρχική > Μορφοποίηση υπό όρους > Νέος κανόνας.

2. Στο Νέος κανόνας μορφοποίησης διαλόγου, επιλέξτε Χρησιμοποιήστε έναν τύπο για να προσδιορίσετε ποια κελιά θα μορφοποιηθούν στο Επιλέξτε έναν τύπο κανόνα ενότητα και μετά μεταβείτε στο πλαίσιο κειμένου κάτω Μορφοποιήστε τιμές όπου ισχύει αυτός ο τύπος, τύπου = ΚΑΙ ($ E $ 2 <> "", $ E $ 2 = A4).

Το E2 είναι το κελί που θα τοποθετήσετε την τιμή αναζήτησης και το A4 είναι το πρώτο κελί στο εύρος στο οποίο πραγματοποιείτε αναζήτηση.

3. κλικ Μορφή κουμπί, μεταβείτε στο κύτταρα μορφή διαλόγου, κάτω Γέμισμα καρτέλα, επιλέξτε ένα χρώμα όπως χρειάζεστε. Κάντε κλικ OK > OK για να κλείσετε τους διαλόγους.

Από τώρα και στο εξής, όταν εισαγάγετε τη λέξη-κλειδί στο Cell E2, τα αποτελέσματα αναζήτησης θα επισημανθούν αυτόματα στο καθορισμένο εύρος.

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

Το Kutools για Excel είναι ένα ισχυρό πρόσθετο που συλλέγει περισσότερα από 300 εύχρηστα εργαλεία για τη βελτίωση της αποτελεσματικότητάς σας στις εργασίες του Excel, κάντε κλικ για να λάβετε δωρεάν δοκιμή 30 ημερών τώρα.

1. Επιλέξτε το εύρος δεδομένων που θέλετε να αναζητήσετε, κάντε κλικ Kutools > Κείμενο > Επισήμανση λέξης-κλειδιού.

2. Στο αναδυόμενο παράθυρο διαλόγου, πληκτρολογήστε τις τιμές που θέλετε να αναζητήσετε και τις οποίες διαχωρίστε με κόμμα Λέξη-κλειδί πλαίσιο κειμένου. Στη συνέχεια επιλέξτε το Επιλογές επισήμανσης και το χρώμα της γραμματοσειράς όπως χρειάζεστε. Κάντε κλικ Ok.

Εάν θέλετε να αναζητήσετε τιμή με διάκριση πεζών-κεφαλαίων, επιλέξτε Match Case κουτάκι.

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

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

Κάντε κλικ για λήψη του δείγματος αρχείου

---

Τα καλύτερα εργαλεία παραγωγικότητας του Office

Το Kutools για Excel λύνει τα περισσότερα από τα προβλήματά σας και αυξάνει την παραγωγικότητά σας κατά 80%

• Super Formula Bar (επεξεργαστείτε εύκολα πολλές γραμμές κειμένου και τύπου). Διάταξη ανάγνωσης (εύκολη ανάγνωση και επεξεργασία μεγάλου αριθμού κελιών). Επικόλληση σε φιλτραρισμένο εύρος...
• Συγχώνευση κελιών / σειρών / στηλών και τήρηση δεδομένων · Περιεχόμενο διαχωρισμού κελιών Συνδυάστε διπλές σειρές και άθροισμα / μέσος όρος... Αποτροπή διπλών κυττάρων; Συγκρίνετε τα εύρη...
• Επιλέξτε Διπλότυπο ή Μοναδικό Σειρές; Επιλέξτε Κενές σειρές (όλα τα κελιά είναι κενά). Σούπερ εύρεση και ασαφής εύρεση σε πολλά βιβλία εργασίας. Τυχαία επιλογή ...
• Ακριβές αντίγραφο Πολλαπλά κελιά χωρίς αλλαγή της αναφοράς τύπου. Αυτόματη δημιουργία αναφορών σε πολλαπλά φύλλα? Εισαγωγή κουκκίδων, Πλαίσια ελέγχου και άλλα ...
• Αγαπημένα και γρήγορη εισαγωγή τύπων, Σειρά, Διαγράμματα και Εικόνες; Κρυπτογράφηση κυττάρων με κωδικό πρόσβασης Δημιουργία λίστας αλληλογραφίας και στείλτε email ...
• Εξαγωγή κειμένου, Προσθήκη κειμένου, Κατάργηση κατά θέση, Αφαιρέστε το διάστημα; Δημιουργία και εκτύπωση υποσύνολων σελιδοποίησης. Μετατροπή περιεχομένου και σχολίων μεταξύ κελιών...
• Σούπερ φίλτρο (αποθηκεύστε και εφαρμόστε σχήματα φίλτρων σε άλλα φύλλα). Προηγμένη ταξινόμηση ανά μήνα / εβδομάδα / ημέρα, συχνότητα και άλλα. Ειδικό φίλτρο με έντονη, πλάγια ...
• Συνδυάστε βιβλία εργασίας και φύλλα εργασίας; Συγχώνευση πινάκων βάσει βασικών στηλών. Διαχωρίστε τα δεδομένα σε πολλά φύλλα; Μαζική μετατροπή xls, xlsx και PDF...
• Ομαδοποίηση συγκεντρωτικού πίνακα κατά αριθμός εβδομάδας, ημέρα εβδομάδας και πολλά άλλα ... Εμφάνιση ξεκλειδωμένων, κλειδωμένων κελιών με διαφορετικά χρώματα. Επισημάνετε τα κελιά που έχουν τύπο / όνομα...

Διαβάστε περισσότερα ... Πλήρεις δυνατότητες Δωρεάν δοκιμή 30 ημερών... Αγορά... 

---

Office Tab - φέρνει τη διεπαφή με καρτέλες στο Office και διευκολύνει την εργασία σας

• Ενεργοποίηση επεξεργασίας και ανάγνωσης καρτελών σε Word, Excel, PowerPoint, Publisher, Access, Visio και Project.
• Ανοίξτε και δημιουργήστε πολλά έγγραφα σε νέες καρτέλες του ίδιου παραθύρου και όχι σε νέα παράθυρα.
• Αυξάνει την παραγωγικότητά σας κατά 50% και μειώνει εκατοντάδες κλικ του ποντικιού για εσάς κάθε μέρα!

Διαβάστε περισσότερα ... Πλήρεις δυνατότητες Δωρεάν δοκιμή 30 ημερών... Αγορά...