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

• Αναπτυσσόμενη λίστα με δυνατότητα αναζήτησης στο Excel 365
• Δημιουργία αναπτυσσόμενης λίστας με δυνατότητα αναζήτησης (για Excel 2019 και νεότερες εκδόσεις)
• Δημιουργήστε εύκολα αναπτυσσόμενη λίστα με δυνατότητα αναζήτησης (για όλες τις εκδόσεις του Excel)
• Δημιουργία αναπτυσσόμενης λίστας με δυνατότητα αναζήτησης με Combo box και VBA (πιο πολύπλοκο)

Βίντεο

Αναπτυσσόμενη λίστα με δυνατότητα αναζήτησης στο Excel 365

Το Excel 365 εισήγαγε μια πολυαναμενόμενη δυνατότητα στις αναπτυσσόμενες λίστες επικύρωσης δεδομένων: τη δυνατότητα αναζήτησης στη λίστα. Με τη δυνατότητα αναζήτησης, οι χρήστες μπορούν γρήγορα να εντοπίσουν και να επιλέξουν στοιχεία με πιο αποτελεσματικό τρόπο. Αφού εισαγάγετε την αναπτυσσόμενη λίστα ως συνήθως, απλώς κάντε κλικ σε ένα κελί με μια αναπτυσσόμενη λίστα και ξεκινήστε να πληκτρολογείτε. Η λίστα θα φιλτράρει αμέσως για να ταιριάζει με το πληκτρολογημένο κείμενο.

Σε αυτή την περίπτωση πληκτρολογώ Σαν στο κελί και η αναπτυσσόμενη λίστα φιλτράρει τις πόλεις που ξεκινούν με τον όρο αναζήτησης Σαν, Όπως Σαν Φρανσίσκο και Σαν Ντιέγκο. Στη συνέχεια, μπορείτε να επιλέξετε ένα αποτέλεσμα με το ποντίκι σας ή να χρησιμοποιήσετε τα πλήκτρα βέλους και να πατήσετε Enter.

Δημιουργία αναπτυσσόμενης λίστας με δυνατότητα αναζήτησης (για Excel 2019 και νεότερες εκδόσεις)

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

Υποθέτοντας ότι έχετε δημιουργήσει μια αναπτυσσόμενη λίστα στο κελί A2 του Sheet2 (εικόνα στα δεξιά) χρησιμοποιώντας δεδομένα στην περιοχή A2:A8 του Sheet1 (εικόνα στα αριστερά), ακολουθήστε αυτά τα βήματα για να κάνετε τη λίστα με δυνατότητα αναζήτησης.

Βήμα 1. Δημιουργήστε μια βοηθητική στήλη που παραθέτει τα στοιχεία αναζήτησης

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

1. Επιλέξτε το πρώτο κελί D1 στη στήλη D και εισαγάγετε την κεφαλίδα της στήλης, όπως "Αποτελέσματα αναζήτησης" σε αυτήν την περίπτωση.
2. Εισαγάγετε τον ακόλουθο τύπο στο κελί D2 και πατήστε εισάγετε.

   =FILTER(A2:A8,ISNUMBER(SEARCH(Sheet2!A2,A2:A8)),"Not Found")

   

Βήμα 2: Ρυθμίστε ξανά τις παραμέτρους της αναπτυσσόμενης λίστας

1. Επιλέξτε το κελί της αναπτυσσόμενης λίστας (σε αυτήν την περίπτωση, επιλέγω το κελί A2 του Φύλλου2) και μετά πηγαίνω στην επιλογή ημερομηνία > επικύρωση δεδομένων > επικύρωση δεδομένων.
   
2. Στο επικύρωση δεδομένων παράθυρο διαλόγου, πρέπει να ρυθμίσετε τις παραμέτρους ως εξής.
   1. Σύμφωνα με το ρυθμίσεις καρτέλα, κάντε κλικ στο στο κουμπί Πηγή κουτί.
      
   2. Η επικύρωση δεδομένων το παράθυρο διαλόγου θα ανακατευθύνει στο Φύλλο1, επιλέξτε το κελί (π.χ. D2) με τον τύπο από το Βήμα 1, προσθέστε ένα # σύμβολο και κάντε κλικ στο Κλεισιμο κουμπί.
      
   3. Πηγαίνετε στο Ειδοποίηση σφάλματος καρτέλα, καταργήστε την επιλογή του Εμφάνιση ειδοποίησης σφάλματος μετά την εισαγωγή μη έγκυρων δεδομένων πλαίσιο ελέγχου και, τέλος, κάντε κλικ στο OK Για να αποθηκεύσετε τις αλλαγές.
      

Αποτέλεσμα

Η αναπτυσσόμενη λίστα στο κελί A2 του Φύλλου2 είναι πλέον διαθέσιμη. Πληκτρολογήστε κείμενο στο κελί, κάντε κλικ στο αναπτυσσόμενο βέλος για να αναπτύξετε την αναπτυσσόμενη λίστα και θα δείτε τη λίστα να φιλτράρεται αμέσως για να ταιριάζει με το πληκτρολογημένο κείμενο.

Δημιουργήστε εύκολα αναπτυσσόμενη λίστα με δυνατότητα αναζήτησης (για όλες τις εκδόσεις του Excel)

Δεδομένων των διαφόρων περιορισμών των παραπάνω μεθόδων, εδώ είναι ένα πολύ αποτελεσματικό εργαλείο για εσάς - Kutools για Excel's Κάντε την αναπτυσσόμενη λίστα με δυνατότητα αναζήτησης, αυτόματο αναδυόμενο παράθυροχαρακτηριστικό. Αυτή η δυνατότητα είναι διαθέσιμη σε όλες τις εκδόσεις του Excel και σας επιτρέπει να αναζητήσετε εύκολα το επιθυμητό στοιχείο στην αναπτυσσόμενη λίστα με μια απλή εγκατάσταση.

Μετά το λήψη και εγκατάσταση Kutools για Excel, Επιλέξτε Kutools > Αναπτυσσόμενη λίστα > Κάντε την αναπτυσσόμενη λίστα με δυνατότητα αναζήτησης, αυτόματο αναδυόμενο παράθυρο για να ενεργοποιήσετε αυτήν τη δυνατότητα. Στο Κάντε την αναπτυσσόμενη λίστα με δυνατότητα αναζήτησης πλαίσιο διαλόγου, πρέπει:

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

Αποτέλεσμα

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

Δημιουργία αναπτυσσόμενης λίστας με δυνατότητα αναζήτησης με Combo box και VBA (πιο πολύπλοκο)

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

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

Πρέπει να εισαγάγετε ένα σύνθετο πλαίσιο αντί για μια αναπτυσσόμενη λίστα επικύρωσης δεδομένων στο φύλλο εργασίας σας.

1. Εάν η Εργολάβος η καρτέλα δεν εμφανίζεται στην κορδέλα, μπορείτε να ενεργοποιήσετε το Εργολάβος καρτέλα ως εξής.
   1. Στο Excel 2010 ή νεότερες εκδόσεις, κάντε κλικ Αρχεία > Επιλογές. Και στο Επιλογές Excel , κάντε κλικ στην επιλογή Προσαρμογή της Κορδέλας στο αριστερό παράθυρο. Μεταβείτε στο πλαίσιο λίστας Προσαρμογή της κορδέλας, επιλέξτε το Εργολάβος πλαίσιο και, στη συνέχεια, κάντε κλικ στο OK κουμπί. Δείτε το στιγμιότυπο οθόνης:
      
   2. Στο Excel 2007, κάντε κλικ στο Office κουμπί> Επιλογές του Excel. Στην Επιλογές του Excel , κάντε κλικ στην επιλογή Δημοφιλής στο αριστερό παράθυρο, επιλέξτε το Εμφάνιση καρτέλας προγραμματιστή στην κορδέλα πλαίσιο και, τέλος, κάντε κλικ στο OK κουμπί.
      
2. Μετά την εμφάνιση του Εργολάβος κάντε κλικ στην καρτέλα Εργολάβος > Κύριο θέμα > Σύνθετο κιβώτιο.
   
3. Σχεδιάστε ένα σύνθετο πλαίσιο στο φύλλο εργασίας, κάντε δεξί κλικ σε αυτό και, στη συνέχεια, επιλέξτε Ιδιοκτησίες από το μενού με δεξί κλικ.
   
4. Στο Ιδιοκτησίες πλαίσιο διαλόγου, πρέπει:
   1. Αγορά Ψευδής στο AutoWordSelect πεδίο;
   2. Καθορίστε ένα κελί στο Συνδεδεμένο κελί πεδίο. Σε αυτήν την περίπτωση, μπαίνουμε στο Α12.
   3. Αγορά 2-fmMatchEntryNone στο MatchEntry πεδίο;
   4. Χαρακτηριστικά DropDownList μέσα στο ΛίσταFillRange πεδίο;
   5. Κλείστε το Ιδιοκτησίες κουτί διαλόγου. Δείτε το στιγμιότυπο οθόνης:
      
5. Τώρα απενεργοποιήστε τη λειτουργία σχεδίασης κάνοντας κλικ Εργολάβος > Λειτουργία σχεδίασης.
6. Επιλέξτε ένα κενό κελί όπως το C2, εισαγάγετε τον παρακάτω τύπο και πατήστε εισάγετε. Σέρνουν τη λαβή Αυτόματης Συμπλήρωσης στο κελί C9 για να γεμίσουν αυτόματα τα κελιά με τον ίδιο τύπο. Δείτε στιγμιότυπο οθόνης:

   =--ISNUMBER(IFERROR(SEARCH($A$12,A2,1),""))

   
   Notes:

   1. $ 12 $ είναι το κελί που το έχετε ορίσει ως το Συνδεδεμένο κελί στο βήμα 4?
   2. Αφού ολοκληρώσετε τα παραπάνω βήματα, μπορείτε τώρα να δοκιμάσετε: πληκτρολογήστε ένα γράμμα C στο σύνθετο πλαίσιο και, στη συνέχεια, μπορείτε να δείτε ότι τα κελιά τύπου που αναφέρονται στα κελιά που περιέχουν τον χαρακτήρα C είναι γεμάτα με τον αριθμό 1.
7. Επιλέξτε το κελί D2, πληκτρολογήστε τον παρακάτω τύπο και πατήστε εισάγετε. Στη συνέχεια, σύρετε τη λαβή αυτόματης συμπλήρωσης προς τα κάτω στο κελί D9.

   =IF(C2=1,COUNTIF($C$2:C2,1),"")

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

   =IFERROR(INDEX($A$2:$A$9,MATCH(ROWS($D$2:D2),$D$2:$D$9,0)),"")

   
9. Τώρα πρέπει να δημιουργήσετε ένα εύρος ονομάτων. Παρακαλώ πατήστε Τύπος > Ορίστε το όνομα.
   
10. Στο Νέο όνομα , πληκτρολογήστε DropDownList στο Όνομα πλαίσιο, πληκτρολογήστε τον παρακάτω τύπο στο Αναφέρεται σε πλαίσιο και, στη συνέχεια, κάντε κλικ στο OK κουμπί.

    =$E$2:INDEX($E$2:$E$9,MAX($D$2:$D$9),1)
    

    
11. Τώρα, ενεργοποιήστε τη λειτουργία σχεδίασης κάνοντας κλικ Εργολάβος > Λειτουργία σχεδίασης. Στη συνέχεια, κάντε διπλό κλικ στο πλαίσιο Combo για να ανοίξετε το Microsoft Visual Basic για εφαρμογές παράθυρο.
12. Αντιγράψτε και επικολλήστε τον παρακάτω κώδικα VBA στο πρόγραμμα επεξεργασίας κώδικα.
    
    Κωδικός VBA: κάντε αναζήτηση στην αναπτυσσόμενη λίστα

    Private Sub ComboBox1_GotFocus()
    	ComboBox1.ListFillRange = "DropDownList"
    	Me.ComboBox1.DropDown
    End Sub

13. Πατήστε το κουμπί άλλος + Q πλήκτρα για να κλείσετε το Microsoft Visual Basic για εφαρμογές παράθυρο.

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

Σχετικά άρθρα: