Ga naar hoofdinhoud

Hoe cellen samen te voegen, negeer of sla lege cellen over in Excel?

Blinkt uit Concatenate functie kan u helpen om meerdere celwaarden snel in één cel te combineren, als er enkele lege cellen in de geselecteerde cellen zijn, zal deze functie de lege cellen ook combineren. Maar soms wilt u cellen met gegevens aaneenschakelen en de lege cellen overslaan, hoe zou u het in Excel kunnen afmaken?

Aaneengeschakelde cellen negeren of overslaan lege velden met formule

Aaneengeschakelde cellen negeren of slaan lege cellen over met de door de gebruiker gedefinieerde functie

Aaneengeschakelde cellen negeren of slaan lege cellen over met Kutools voor Excel


Stel dat ik de volgende celdata heb die zijn gevuld met enkele lege cellen, om de rijen in één cel te combineren, kunt u een formule toepassen om het op te lossen.

doc maaidorser overslaan spaties 1

Voer deze formule in een lege cel in waar u het samengevoegde resultaat wilt plaatsen, =A1&IF(A2<>"","-"&A2,"")&IF(A3<>"","-"&A3,"")&IF(A4<>"","-"&A4,"")&IF(A5<>"","-"&A5,""), sleep vervolgens de vulgreep naar rechts naar de cellen waarop u deze formule wilt toepassen, en de waarden van rijen zijn gecombineerd zonder de lege cellen zoals in de volgende schermafbeelding:

doc maaidorser overslaan spaties 2

Tips: Als er meer rijen moeten worden aaneengeschakeld, moet u de ALS-functie gebruiken om de cellen samen te voegen, zoals =A1&IF(A2<>"","-"&A2,"")&IF(A3<>"","-"&A3,"")&IF(A4<>"","-"&A4,"")&IF(A5<>"","-"&A5,"")&IF(A6<>"","-"&A6,""). De "-" teken in de formule kan worden vervangen door andere scheidingstekens die u nodig heeft.


Meerdere cellen samenvoegen negeer of sla lege cellen over:

Kutools for Excel's Combineren Rijen, kolommen of cellen zonder gegevensverlies functie kan u helpen om meerdere rijen, kolommen of cellen te combineren of samen te voegen zonder gegevens te verliezen, maar lege cellen over te slaan of te negeren. Klik om Kutools voor Excel te downloaden!

doc maaidorser overslaan spaties 7

Kutools for Excel: met meer dan 300 handige Excel-invoegtoepassingen, gratis te proberen zonder beperking in 30 dagen. Download en probeer nu gratis!


Als er meerdere cellen moeten worden gecombineerd, is de bovenstaande formule te complex om uit te voeren, dus u kunt de volgende door de gebruiker gedefinieerde functie gebruiken om het op te lossen.

1. Houd de Alt + F11 toetsen in Excel, en het opent het Microsoft Visual Basic voor toepassingen venster.

2. Klikken Invoegen > Moduleen plak de volgende macro in het Module Venster.

VBA-code: aaneengeschakelde cellen negeren lege plekken:

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. Sla dit codevenster op en sluit het, ga terug naar het werkblad en voer deze formule in: = aaneenschakelcellen (A1: A5) in een lege cel en sleep de vulgreep naar rechts naar de cellen om deze formule toe te passen, en je krijgt het volgende resultaat:

doc maaidorser overslaan spaties 3

Tips: In de bovenstaande VBA-code kunt u de "/”Teken naar eventuele andere scheidingstekens die u nodig heeft.


Met uitzondering van de saaie formule en code, kan ik hier een handig hulpmiddel aanbevelen-Kutools for Excel, met zijn krachtige Combineren hulpprogramma, kunt u zonder enige moeite meerdere cellen samenvoegen tot één cel.

Kutools for Excel : met meer dan 300 handige Excel-invoegtoepassingen, gratis te proberen zonder beperking in 30 dagen

Na het installeren van Kutools for Excelgaat u als volgt te werk:

1. Selecteer de celwaarde die u wilt combineren.

2. Klikken Kutools > Samenvoegen en splitsenCombineer rijen, kolommen of cellen zonder gegevens te verliezen, zie screenshot:

3. In het uitgeklapte dialoogvenster:

  • (1.) Kies het type cellen dat u wilt combineren, u kunt kolommen combineren, rijen combineren en alle cellen combineren tot een enkele cel;
  • (2.) Specificeer een scheidingsteken voor uw aaneengeschakelde inhoud;
  • (3.) Kies de locatie om het resultaat te plaatsen, u kunt het resultaat in de bovenste cel of onderste cel plaatsen;
  • (4.) Specificeer hoe u met de gecombineerde cellen moet omgaan, u kunt de inhoud van die gecombineerde cellen behouden of verwijderen, en u kunt ook die gecombineerde cellen samenvoegen.

doc maaidorser overslaan spaties 5

4. Klik na het voltooien van de instellingen op Ok knop, en de geselecteerde rijen zijn afzonderlijk in één cel gecombineerd en het heeft de lege plekken automatisch overgeslagen, zie screenshot:

doc maaidorser overslaan spaties 6

Download en gratis proef Kutools voor Excel nu!


Kutools for Excel: met meer dan 300 handige Excel-invoegtoepassingen, gratis te proberen zonder beperking in 30 dagen. Download en probeer nu gratis!

Beste Office-productiviteitstools

🤖 Kutools AI-assistent: Een revolutie teweegbrengen in de data-analyse op basis van: Intelligente uitvoering   |  Genereer code  |  Aangepaste formules maken  |  Analyseer gegevens en genereer grafieken  |  Roep Kutools-functies aan...
Populaire functies: Zoek, markeer of identificeer duplicaten   |  Verwijder lege rijen   |  Combineer kolommen of cellen zonder gegevens te verliezen   |   Ronde zonder formule ...
Super opzoeken: Meerdere criteria VLookup    VLookup met meerdere waarden  |   VOpzoeken over meerdere bladen   |   Fuzzy opzoeken ....
Geavanceerde vervolgkeuzelijst: Maak snel een vervolgkeuzelijst   |  Afhankelijke vervolgkeuzelijst   |  Multi-select vervolgkeuzelijst ....
Kolom Beheerder: Voeg een specifiek aantal kolommen toe  |  Kolommen verplaatsen  |  Schakel de zichtbaarheidsstatus van verborgen kolommen in  |  Vergelijk bereiken en kolommen ...
Uitgelichte functies: Raster focus   |  Ontwerpweergave   |   Grote formulebalk    Werkmap- en bladbeheer   |  resource Library (Auto-tekst)   |  Datumkiezer   |  Combineer werkbladen   |  Cellen coderen/decoderen    Stuur e-mails per lijst   |  Super filter   |   Speciaal filter (filter vet/cursief/doorhalen...) ...
Top 15 gereedschapsets12 Tekst Tools (toe te voegen tekst, Tekens verwijderen, ...)   |   50+ tabel Types (Gantt Chart, ...)   |   40+ Praktisch Formules (Bereken leeftijd op basis van verjaardag, ...)   |   19 Invoeging Tools (QR-code invoegen, Afbeelding invoegen vanaf pad, ...)   |   12 Camper ombouw Tools (Getallen naar woorden, Currency Conversion, ...)   |   7 Samenvoegen en splitsen Tools (Geavanceerd Combineer rijen, Gespleten cellen, ...)   |   ... en meer

Geef uw Excel-vaardigheden een boost met Kutools voor Excel en ervaar efficiëntie als nooit tevoren. Kutools voor Excel biedt meer dan 300 geavanceerde functies om de productiviteit te verhogen en tijd te besparen.  Klik hier om de functie te krijgen die u het meest nodig heeft...

Omschrijving


Office-tabblad Brengt een interface met tabbladen naar Office en maakt uw werk veel gemakkelijker

  • Schakel bewerken en lezen met tabbladen in Word, Excel, PowerPoint in, Publisher, Access, Visio en Project.
  • Open en maak meerdere documenten in nieuwe tabbladen van hetzelfde venster in plaats van in nieuwe vensters.
  • Verhoogt uw productiviteit met 50% en vermindert honderden muisklikken voor u elke dag!
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