Tip: andere talen zijn Google-Vertaald. Je kunt het English versie van deze link.
Log in
x
or
x
x
Registreren
x

or

Hoe kunnen cellen samenvoegen negeren of spaties overslaan 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, combineert deze functie ook de lege cellen. Maar soms wil je alleen cellen met gegevens aaneenschakelen en de lege cellen overslaan, hoe kun je het in Excel afmaken?

Samengevoegde cellen negeren of verslaan cellen met formule

Samengevoegde cellen negeren of overslaan met User Defined Function

Samengevoegde cellen negeren of verslaan lege waarden met Kutools voor Excel


Samenvoegen meerdere cellen negeren of spaties overslaan:

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

doc combineer overslaan blanks 7

Kutools for Excel: met meer dan 200 handige Excel-add-ins, gratis om zonder beperking in 60-dagen te proberen. Download en gratis proef nu!



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

doc combineer overslaan blanks 1

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

doc combineer overslaan blanks 2

Tips: Als er meer rijen moeten worden samengevoegd, moet u de functie ALS gebruiken om de cellen te verbinden, 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 hebt.


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 toets ingedrukt Alt + F11 toetsen in Excel, en het opent de Microsoft Visual Basic voor toepassingen venster.

2. Klikken bijvoegsel > module, en plak de volgende macro in de module Venster.

VBA-code: samengevoegde cellen negeren lege cellen:

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

3. Sla dit codevenster op en sluit het, ga terug naar het werkblad en voer vervolgens deze formule in: = Concatenatecells (A1: A5) in een lege cel en sleep de vulgreep naar de cellen om deze formule toe te passen, en u krijgt het volgende resultaat:

doc combineer overslaan blanks 3

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


Behalve de saaie formule en code, kan ik hier een handige tool aanbevelenKutools for Excel, met zijn krachtige Combineren utility, je kunt meerdere cellen in één cel samenvoegen zonder inspanningen.

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

Na het installeren van Kutools for Excel, alsjeblieft als volgt doen:

1. Selecteer de cellenwaarde die u wilt combineren.

2. Klikken Kutools > Combinerenzie screenshot:

doc combineer overslaan blanks 4

3. In de Kolommen of rijen combineren dialoogvenster:

  • (1.) Kies het type cellen dat u wilt combineren, u kunt kolommen combineren, rij combineren en alle cellen combineren in een enkele cel;
  • (2.) Geef een scheidingsteken op voor uw aaneengeschakelde inhoud;
  • (3.) Kies de locatie om het resultaat te plaatsen, u kunt het resultaat naar de bovenste cel of de onderste cel brengen;
  • (4.) Geef op hoe om te gaan met de gecombineerde cellen, u kunt inhoud uit die gecombineerde cellen bewaren of verwijderen, en u kunt ook die gecombineerde cellen samenvoegen.
  • doc combineer overslaan blanks 5

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

    doc combineer overslaan blanks 6

    Klik om meer details over deze functie Combineren te weten ...

    Download en proef Kutools nu voor Excel!


    Kutools for Excel: met meer dan 200 handige Excel-add-ins, gratis om zonder beperking in 60-dagen te proberen. Download en gratis proef nu!


    Kutools voor Excel - De beste Office-productiviteitstool Verhoog uw productiviteit met 80%

    • visfuik: Snel invoegen complexe formules, grafieken en alles wat je eerder hebt gebruikt; Coderen van cellen met wachtwoord; Maak een mailinglijst en stuur e-mails ...
    • Super Formula Bar (bewerk eenvoudig meerdere regels tekst en formule); Lay-out lezen (gemakkelijk grote aantallen cellen lezen en bewerken); Plakken op gefilterd bereik...
    • Cellen / rijen / kolommen samenvoegen zonder gegevens te verliezen; Inhoud gesplitste cellen; Combineer dubbele rijen / kolommen... voorkomen dubbele cellen; Ranges vergelijken...
    • Selecteer Dupliceren of Uniek rijen; Selecteer Lege rijen (alle cellen zijn leeg); Super Find en Fuzzy Find in veel werkboeken; Willekeurig selecteren ...
    • Exacte kopie Meerdere cellen zonder formule-referentie te wijzigen; Automatisch referenties maken naar meerdere vellen; Voeg kogels toe, Selectievakjes en meer ...
    • extract Text, Tekst toevoegen, verwijderen op positie, Verwijder de spatie; Subtotalen voor paging maken en afdrukken; Converteren tussen cellen Inhoud en opmerkingen...
    • Super filter (bewaar en pas filterschema's toe op andere bladen); Geavanceerde sortering per maand / week / dag, frequentie en meer; Speciaal filter door vet, cursief ...
    • Combineer werkmappen en werkbladen; Tabellen samenvoegen op basis van sleutelkolommen; Gegevens splitsen in meerdere bladen; Batch Converteer xls, xlsx en PDF...
    • Meer dan 300 krachtige functies. Ondersteunt Office / Excel 2007-2019 en 365. Ondersteunt alle talen. Eenvoudig te implementeren in uw onderneming of organisatie. Volledige functionaliteit 60-daagse gratis proefversie.
    kte-tab 201905

    Tabblad Office Brengt interface met tabbladen naar Office en maakt uw werk veel eenvoudiger

    • Bewerken en lezen met tabbladen inschakelen in Word, Excel, PowerPoint, 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 verlaagt dagelijks honderden muisklikken voor u!
    Officetab onderaan
    Say something here...
    symbols left.
    You are guest ( Sign Up? )
    or post as a guest, but your post won't be published automatically.
    Loading comment... The comment will be refreshed after 00:00.
    • To post as a guest, your comment is unpublished.
      D · 3 months ago
      This worked a treat, thanks so much
    • To post as a guest, your comment is unpublished.
      Melinda · 7 months ago
      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
      • To post as a guest, your comment is unpublished.
        skyyang · 7 months ago
        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)
        • To post as a guest, your comment is unpublished.
          Melinda · 7 months ago
          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!!
    • To post as a guest, your comment is unpublished.
      Adri · 1 years ago
      Thank you, it was very helpful!
    • To post as a guest, your comment is unpublished.
      Lize-marie van Onselen · 1 years ago
      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?
    • To post as a guest, your comment is unpublished.
      sindre · 2 years ago
      Thank you! This saved hours of frustration on my part! Works as a charm!
    • To post as a guest, your comment is unpublished.
      Par · 2 years ago
      The VBA script is wrong, because the output of the formula puts a huge space between the delimiters.