Μετάβαση στο κύριο περιεχόμενο

Πώς να συνδυάσετε κελιά που αγνοούν ή παραλείπουν κενά στο Excel;

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

Τα συνενωμένα κελιά αγνοούν ή παραλείπουν τα κενά με τον τύπο

Τα συνενωμένα κελιά αγνοούν ή παραλείπουν κενά με τη λειτουργία που καθορίζεται από το χρήστη

Τα συνενωμένα κελιά αγνοούν ή παραλείπουν κενά με το Kutools για Excel


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

doc συνδυάστε κενά κενά 1

Εισαγάγετε αυτόν τον τύπο σε ένα κενό κελί όπου θέλετε να βάλετε το συνενωμένο αποτέλεσμα, =A1&IF(A2<>"","-"&A2,"")&IF(A3<>"","-"&A3,"")&IF(A4<>"","-"&A4,"")&IF(A5<>"","-"&A5,"")και, στη συνέχεια, σύρετε τη λαβή πλήρωσης προς τα δεξιά στα κελιά που θέλετε να εφαρμόσετε αυτόν τον τύπο και οι τιμές των γραμμών έχουν συνδυαστεί χωρίς τα κενά κελιά όπως φαίνεται στο παρακάτω στιγμιότυπο οθόνης:

doc συνδυάστε κενά κενά 2

Συμβουλές: Εάν υπάρχουν περισσότερες σειρές που πρέπει να συνδυαστούν, θα πρέπει να χρησιμοποιήσετε τη συνάρτηση IF για να ενώσετε τα κελιά, όπως =A1&IF(A2<>"","-"&A2,"")&IF(A3<>"","-"&A3,"")&IF(A4<>"","-"&A4,"")&IF(A5<>"","-"&A5,"")&IF(A6<>"","-"&A6,""). Ο "-" Ο χαρακτήρας στον τύπο μπορεί να αντικατασταθεί με άλλα οριοθετικά που χρειάζεστε.


Συνδυασμένα πολλαπλά κελιά αγνοούν ή παραλείπουν κενά:

Kutools για Excel's Συνδυασμός Σειρές, στήλες ή κελιά χωρίς απώλεια δεδομένων Η δυνατότητα μπορεί να σας βοηθήσει να συνδυάσετε ή να συνδυάσετε πολλές σειρές, στήλες ή κελιά χωρίς να χάσετε δεδομένα αλλά να παραλείψετε ή να αγνοήσετε τα κενά κελιά. Κάντε κλικ για λήψη του Kutools για Excel!

doc συνδυάστε κενά κενά 7

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


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

1. Κρατήστε πατημένο το Alt + F11 στο Excel και ανοίγει το Microsoft Visual Basic για εφαρμογές παράθυρο.

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

Κωδικός VBA: Τα συνδυασμένα κελιά αγνοούν κενά:

Function Concatenatecells(ConcatArea As Range) As String
'updateby Extendoffice
  For Each n In ConcatArea: nn = IIf(n = "", nn & "", nn & n & "/"): Next
  Concatenatecells = Left(nn, Len(nn) - 1)
End Function

3. Αποθηκεύστε και κλείστε αυτό το παράθυρο κώδικα, επιστρέψτε στο φύλλο εργασίας και, στη συνέχεια, εισαγάγετε αυτόν τον τύπο: = concatenatecells (A1: A5) σε ένα κενό κελί και σύρετε τη λαβή πλήρωσης δεξιά στα κελιά για να εφαρμόσετε αυτόν τον τύπο και θα λάβετε το ακόλουθο αποτέλεσμα:

doc συνδυάστε κενά κενά 3

Συμβουλές: Στον παραπάνω κώδικα VBA, μπορείτε να αλλάξετε το "/Χαρακτήρας σε οποιονδήποτε άλλο οριοθέτη που χρειάζεστε.


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

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

Μετά την εγκατάσταση Kutools για Excel, κάντε τα εξής:

1. Επιλέξτε την τιμή κελιών που θέλετε να συνδυάσετε.

2. Κλίκ Kutools > Συγχώνευση & διαχωρισμόςΣυνδυάστε σειρές, στήλες ή κελιά χωρίς απώλεια δεδομένων, δείτε το στιγμιότυπο οθόνης:

3. Στο αναδυόμενο διάλογο:

  • (1.) Επιλέξτε τον τύπο των κελιών που θέλετε να συνδυάσετε, μπορείτε να συνδυάσετε στήλες, να συνδυάσετε σειρά και να συνδυάσετε όλα τα κελιά σε ένα κελί.
  • (2.) Καθορίστε ένα διαχωριστικό για τα συνδυασμένα περιεχόμενά σας.
  • (3.) Επιλέξτε την τοποθεσία για να βάλετε το αποτέλεσμα, μπορείτε να βάλετε το αποτέλεσμα στο επάνω κελί ή στο κάτω κελί.
  • (4.) Προσδιορίστε τον τρόπο αντιμετώπισης των συνδυασμένων κελιών, μπορείτε να διατηρήσετε ή να διαγράψετε περιεχόμενο από αυτά τα συνδυασμένα κελιά και μπορείτε επίσης να συγχωνεύσετε αυτά τα συνδυασμένα κελιά.

doc συνδυάστε κενά κενά 5

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

doc συνδυάστε κενά κενά 6

Κατεβάστε και δωρεάν δοκιμή Kutools για Excel τώρα!


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

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

🤖 Kutools AI Aide: Επανάσταση στην ανάλυση δεδομένων με βάση: Ευφυής Εκτέλεση   |  Δημιουργία κώδικα  |  Δημιουργία προσαρμοσμένων τύπων  |  Αναλύστε δεδομένα και δημιουργήστε γραφήματα  |  Επίκληση Λειτουργιών Kutools...
Δημοφιλή χαρακτηριστικά: Εύρεση, επισήμανση ή αναγνώριση διπλότυπων   |  Διαγραφή κενών γραμμών   |  Συνδυάστε στήλες ή κελιά χωρίς απώλεια δεδομένων   |   Γύρος χωρίς φόρμουλα ...
Σούπερ Αναζήτηση: VLookup πολλαπλών κριτηρίων    VLookup πολλαπλών τιμών  |   VLookup σε πολλά φύλλα   |   Ασαφής αναζήτηση ....
Σύνθετη αναπτυσσόμενη λίστα: Γρήγορη δημιουργία αναπτυσσόμενης λίστας   |  Εξαρτημένη αναπτυσσόμενη λίστα   |  Πολλαπλή αναπτυσσόμενη λίστα ....
Διαχειριστής στήλης: Προσθέστε έναν συγκεκριμένο αριθμό στηλών  |  Μετακίνηση στηλών  |  Εναλλαγή κατάστασης ορατότητας κρυφών στηλών  |  Συγκρίνετε εύρη και στήλες ...
Επιλεγμένα Χαρακτηριστικά: Εστίαση πλέγματος   |  Προβολή σχεδίου   |   Μεγάλη Formula Bar    Διαχείριση βιβλίου εργασίας & φύλλου   |  Βιβλιοθήκη πόρων (Αυτόματο κείμενο)   |  Επιλογή ημερομηνίας   |  Συνδυάστε φύλλα εργασίας   |  Κρυπτογράφηση/Αποκρυπτογράφηση κελιών    Αποστολή email ανά λίστα   |  Σούπερ φίλτρο   |   Ειδικό φίλτρο (φίλτρο με έντονη γραφή/πλάγια γραφή/διαγραφή...) ...
Κορυφαία 15 σύνολα εργαλείων12 Κείμενο Εργαλεία (Προσθήκη κειμένου, Κατάργηση χαρακτήρων, ...)   |   50 + Διάγραμμα Τύποι (Gantt διάγραμμα, ...)   |   40+ Πρακτικό ΜΑΘΗΜΑΤΙΚΟΙ τυποι (Υπολογίστε την ηλικία με βάση τα γενέθλια, ...)   |   19 Εισαγωγή Εργαλεία (Εισαγωγή κωδικού QR, Εισαγωγή εικόνας από το μονοπάτι, ...)   |   12 Μετατροπή Εργαλεία (Αριθμοί σε λέξεις, Μετατροπή Συναλλάγματος, ...)   |   7 Συγχώνευση & διαχωρισμός Εργαλεία (Σύνθετες σειρές συνδυασμού, Διαίρεση κελιών, ...)   |   ... κι αλλα

Αυξήστε τις δεξιότητές σας στο Excel με τα Kutools για Excel και απολαύστε την αποτελεσματικότητα όπως ποτέ πριν. Το Kutools για Excel προσφέρει πάνω από 300 προηγμένες δυνατότητες για την ενίσχυση της παραγωγικότητας και την εξοικονόμηση χρόνου.  Κάντε κλικ εδώ για να αποκτήσετε τη δυνατότητα που χρειάζεστε περισσότερο...

Περιγραφή


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

  • Ενεργοποίηση επεξεργασίας και ανάγνωσης καρτελών σε Word, Excel, PowerPoint, Publisher, Access, Visio και Project.
  • Ανοίξτε και δημιουργήστε πολλά έγγραφα σε νέες καρτέλες του ίδιου παραθύρου και όχι σε νέα παράθυρα.
  • Αυξάνει την παραγωγικότητά σας κατά 50% και μειώνει εκατοντάδες κλικ του ποντικιού για εσάς κάθε μέρα!
Comments (14)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
How would you change the "/" sign for CHAR(10) or line break?
This comment was minimized by the moderator on the site
Hello, Alan,To combine the cells with the line break, you can apply the below simple formula:=TEXTJOIN(CHAR(10),TRUE,A1:A5)
After getting the results with this formula, you should click the Wrap Text to get the correct results you need.
Please try, thank you!
This comment was minimized by the moderator on the site
super, thank Q
This comment was minimized by the moderator on the site
I had issues with the formula provided causing leading delimiters, so I did this instead and it works well. This is concatenating cells horizontally while ignoring blank cells and results in no extra commas.

=IF(A2="", "", A2)&IF(A2="", "", ", ")&IF(B2="", "", B2)&IF(B2="", "", ", ")&IF(C2="", "", C2)
This comment was minimized by the moderator on the site
This worked a treat, thanks so much
This comment was minimized by the moderator on the site
Hi, used the macro and changed the "/" to a comma "," but got a lot of commas and it appeared to add all the blank cells.
I am doing a nested if statement to determine the appropriate sorting in the database. Is this enough to make the blank cell 'active' so that the macro sees this and adds it to the text string? How to work around that?
thanks much
This comment was minimized by the moderator on the site
Hello, Melinda,
the above vba code works well in my worksheet, you just need to change the separator / to comma as below:

Function Concatenatecells(ConcatArea As Range) As String
'updateby Extendoffice 20151103
For Each n In ConcatArea: nn = IIf(n = "", nn & "", nn & n & ","): Next
Concatenatecells = Left(nn, Len(nn) - 1)
End Function

and then apply this formula:=concatenatecells(A1:A5)
This comment was minimized by the moderator on the site
thanks!
I found my problem was in the logic statement that I used to select data for these cells that I was trying to text string. I used a " " instead of "" for the false statement. That was picked up by the macro and used as a space bar and came out , , , , , text, , , ,
So I went back and took out the space and just have the "" and then the macro worked great.
Of course I am learning macros so that's another adventure.
thanks much!!
This comment was minimized by the moderator on the site
Thank you, it was very helpful!
This comment was minimized by the moderator on the site
Please help, i dont always have a value in my first column, that couses that I end up with a seperator infort of the final result. Is there a way around this?
This comment was minimized by the moderator on the site
ever get tis figured out? same boat.
This comment was minimized by the moderator on the site
I don't know how to do it all in one cell, but I added a row with this formula: =IF(LEFT(U20,1)=",",RIGHT(U20,LEN(U20)-2),U20).
My separator was a comma and a space ", " so I used -2 for LEN. U20 is the cell with the concatenated &if formula. The logic of this formula is that if the first character from the left equals a comma, then delete the first two characters; otherwise leave it alone.

Hope this helps.
This comment was minimized by the moderator on the site
Thank you! This saved hours of frustration on my part! Works as a charm!
This comment was minimized by the moderator on the site
The VBA script is wrong, because the output of the formula puts a huge space between the delimiters.
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations