Πώς μπορείτε να συνδυάσετε εύκολα κείμενο βάσει κριτηρίων στο Excel;
Ας υποθέσουμε ότι έχω μια στήλη αριθμών ταυτότητας που περιέχει μερικά αντίγραφα και μια στήλη ονομάτων, και τώρα, θέλω να συνδυάσω τα ονόματα με βάση τους μοναδικούς αριθμούς ταυτότητας όπως φαίνεται στο αριστερό στιγμιότυπο οθόνης, για να συνδυάσω γρήγορα το κείμενο βάσει κριτηρίων, πώς θα μπορούσαμε κάνετε στο Excel;
Συνδυάστε κείμενο βάσει κριτηρίων με λειτουργία που καθορίζεται από το χρήστη
Συνδυάστε κείμενο βάσει κριτηρίων με το Kutools για Excel
Συνδυάστε κείμενο βάσει κριτηρίων με λειτουργία που καθορίζεται από το χρήστη
Για να συνδυάσετε κείμενο με τους μοναδικούς αριθμούς ταυτότητας, μπορείτε πρώτα να εξαγάγετε τις μοναδικές τιμές και, στη συνέχεια, να δημιουργήσετε μια συνάρτηση καθορισμένη από το χρήστη για να συνδυάσετε τα ονόματα με βάση το μοναδικό αναγνωριστικό.
1. Πάρτε τα ακόλουθα δεδομένα ως παράδειγμα, πρέπει πρώτα να εξαγάγετε τους μοναδικούς αριθμούς ταυτότητας, εφαρμόστε αυτόν τον τύπο πίνακα: =IFERROR(INDEX($A$2:$A$15, MATCH(0,COUNTIF($D$1:D1, $A$2:$A$15), 0)),""), Εισαγάγετε αυτόν τον τύπο σε ένα κενό κελί, για παράδειγμα D2 και, στη συνέχεια, πατήστε Ctrl + Shift + Εισαγωγή πλήκτρα μαζί, δείτε το στιγμιότυπο οθόνης:
Άκρο: Στον παραπάνω τύπο, A2: A15 είναι το εύρος δεδομένων λίστας από το οποίο θέλετε να εξαγάγετε μοναδικές τιμές, D1 είναι το πρώτο κελί της στήλης που θέλετε να βγάλετε το αποτέλεσμα εξαγωγής.
2. Και μετά σύρετε τη λαβή πλήρωσης προς τα κάτω για να εξαγάγετε όλες τις μοναδικές τιμές μέχρι να εμφανιστούν κενά, δείτε το στιγμιότυπο οθόνης:
3. Σε αυτό το βήμα, θα πρέπει να δημιουργήσετε ένα Λειτουργία καθορισμένη από τον χρήστη για να συνδυάσετε τα ονόματα με βάση τους μοναδικούς αριθμούς ταυτότητας, κρατήστε πατημένο το ALT + F11 και ανοίγει το Microsoft Visual Basic για εφαρμογές παράθυρο.
4. Κλίκ Κύριο θέμα > Μονάδα μέτρησηςκαι επικολλήστε τον ακόλουθο κώδικα στο Μονάδα μέτρησης Παράθυρο.
Κωδικός VBA: συνδυασμένο κείμενο βάσει κριτηρίων
Function ConcatenateIf(CriteriaRange As Range, Condition As Variant, ConcatenateRange As Range, Optional Separator As String = ",") As Variant
'Updateby Extendoffice
Dim xResult As String
On Error Resume Next
If CriteriaRange.Count <> ConcatenateRange.Count Then
ConcatenateIf = CVErr(xlErrRef)
Exit Function
End If
For i = 1 To CriteriaRange.Count
If CriteriaRange.Cells(i).Value = Condition Then
xResult = xResult & Separator & ConcatenateRange.Cells(i).Value
End If
Next i
If xResult <> "" Then
xResult = VBA.Mid(xResult, VBA.Len(Separator) + 1)
End If
ConcatenateIf = xResult
Exit Function
End Function
5. Στη συνέχεια, αποθηκεύστε και κλείστε αυτόν τον κωδικό, επιστρέψτε στο φύλλο εργασίας σας και εισαγάγετε αυτόν τον τύπο στο κελί E2, = CONCATENATEIF ($ A $ 2: $ A $ 15, D2, $ B $ 2: $ B $ 15, ",") , δείτε το στιγμιότυπο οθόνης:
6. Στη συνέχεια, σύρετε τη λαβή πλήρωσης προς τα κάτω στα κελιά που θέλετε να εφαρμόσετε αυτόν τον τύπο και όλα τα αντίστοιχα ονόματα έχουν συνδυαστεί με βάση τους αριθμούς ταυτότητας, δείτε το στιγμιότυπο οθόνης:
Συμβουλές:
1. Στον παραπάνω τύπο, A2: A15 είναι τα αρχικά δεδομένα στα οποία θέλετε να συνδυάσετε με βάση, D2 είναι η μοναδική τιμή που έχετε εξαγάγει και Β2: Β15 είναι η στήλη ονόματος που θέλετε να συνδυάσετε μαζί.
2. Όπως μπορείτε να δείτε, συνδύαζα τις τιμές που διαχωρίζονται με κόμμα, μπορείτε να χρησιμοποιήσετε άλλους χαρακτήρες αλλάζοντας το κόμμα "," του τύπου όπως χρειάζεστε.
Συνδυάστε κείμενο βάσει κριτηρίων με το Kutools για Excel
Εάν έχετε Kutools για Excel, Με τους Σύνθετες σειρές συνδυασμού βοηθητικό πρόγραμμα, μπορείτε να συνδυάσετε γρήγορα και εύκολα τη βάση κειμένου βάσει κριτηρίων.
Kutools για Excel : με περισσότερα από 300 εύχρηστα πρόσθετα Excel, δωρεάν δοκιμή χωρίς περιορισμό σε 30 ημέρες. |
Μετά την εγκατάσταση Kutools για Excel, κάντε τα εξής βήματα:
1. Επιλέξτε το εύρος δεδομένων που θέλετε να συνδυάσετε με βάση μία στήλη.
2. Κλίκ Kutools > Συγχώνευση & διαχωρισμός > Σύνθετες σειρές συνδυασμού, δείτε το στιγμιότυπο οθόνης:
3. Στην Συνδυάστε σειρές με βάση τη στήλη πλαίσιο διαλόγου, κάντε κλικ στη στήλη Αναγνωριστικό και, στη συνέχεια, κάντε κλικ στο Πρωτεύων κλειδί για να κάνετε αυτήν τη στήλη ως τη βασική στήλη με βάση τα συνδυασμένα δεδομένα σας, δείτε το στιγμιότυπο οθόνης:
4. Και στη συνέχεια κάντε κλικ στο κουμπί Όνομα στήλη στην οποία θέλετε να συνδυάσετε τις τιμές και, στη συνέχεια, κάντε κλικ στο Συνδυασμός και επιλέξτε ένα διαχωριστικό για τα συνδυασμένα δεδομένα, δείτε το στιγμιότυπο οθόνης:
5. Αφού ολοκληρώσετε αυτές τις ρυθμίσεις, κάντε κλικ στο OK για έξοδο από το παράθυρο διαλόγου και τα δεδομένα στη στήλη B έχουν συνδυαστεί με βάση τη βασική στήλη A. Δείτε το στιγμιότυπο οθόνης:
Με αυτήν τη δυνατότητα, το ακόλουθο πρόβλημα θα επιλυθεί το συντομότερο δυνατό:
Πώς να συνδυάσετε πολλές σειρές σε μία και να αθροίσετε διπλότυπα στο Excel;
Κατεβάστε και δωρεάν δοκιμή Kutools για Excel τώρα!
Επίδειξη: Συνδυασμένο κείμενο που βασίζεται στο ίδιο κελί σε μια άλλη στήλη με το Kutools για Excel
Τα καλύτερα εργαλεία παραγωγικότητας γραφείου
Αυξήστε τις δεξιότητές σας στο Excel με τα Kutools για Excel και απολαύστε την αποτελεσματικότητα όπως ποτέ πριν. Το Kutools για Excel προσφέρει πάνω από 300 προηγμένες δυνατότητες για την ενίσχυση της παραγωγικότητας και την εξοικονόμηση χρόνου. Κάντε κλικ εδώ για να αποκτήσετε τη δυνατότητα που χρειάζεστε περισσότερο...
Το Office Tab φέρνει τη διεπαφή με καρτέλες στο Office και κάνει την εργασία σας πολύ πιο εύκολη
- Ενεργοποίηση επεξεργασίας και ανάγνωσης καρτελών σε Word, Excel, PowerPoint, Publisher, Access, Visio και Project.
- Ανοίξτε και δημιουργήστε πολλά έγγραφα σε νέες καρτέλες του ίδιου παραθύρου και όχι σε νέα παράθυρα.
- Αυξάνει την παραγωγικότητά σας κατά 50% και μειώνει εκατοντάδες κλικ του ποντικιού για εσάς κάθε μέρα!