Hoe kopieer en plak ik alleen niet-lege cellen in Excel?
De meesten van ons kunnen last hebben van dit probleem, wanneer we een lijst met gegevens kopiëren die enkele lege cellen bevatten en deze vervolgens in een andere kolom plakken, worden de lege cellen ook geplakt. Dit is erg vervelend als we de lege cellen niet nodig hebben en alleen niet-lege cellen willen plakken. Hoe kunnen we in dit geval alleen niet-lege cellen snel en gemakkelijk in Excel kopiëren en plakken? Hier zijn enkele snelle trucs om het op te lossen:
Kopieer en plak alleen niet-lege cellen met de opdracht Ga naar speciaal
Kopieer en plak alleen niet-lege cellen met de filterfunctie
Kopieer en plak alleen niet-lege cellen met matrixformule
Kopieer en plak alleen niet-lege cellen met VBA-code
Kopieer en plak alleen niet-lege cellen met Kutools voor Excel 
Kopieer en plak alleen niet-lege cellen met de opdracht Ga naar speciaal
Met de Ga naar speciaal opdracht, kunt u eerst alle gegevens selecteren en ze vervolgens kopiëren en op een andere locatie plakken.
1. Selecteer uw lijst met gegevens die u wilt gebruiken.
2. Dan klikken Home > Zoek en selecteer > Ga naar speciaal, zie screenshot:
3. In de Ga naar speciaal dialoogvenster, vink aan constanten optie, zie screenshot:
4. Dan klikken OK, en alleen de waardecellen zijn in de lijst geselecteerd.
5. En kopieer en plak de gegevens vervolgens naar een gewenste locatie. En alleen de niet-lege celwaarden zijn geplakt. Zie screenshot:
Note: Deze methode is alleen beschikbaar voor de constanten en wordt niet toegepast op de formulecellen.
Kopieer en plak alleen niet-lege cellen met de filterfunctie
De FILTER functie kan u helpen de niet-lege cellen eerst te filteren en vervolgens kunt u ze naar behoefte kopiëren en in andere cellen plakken.
2. Klikken Data > FILTER, zie screenshot:
3. Klik vervolgens op de vervolgkeuzeknop in de rechterhoek van de cel in de geselecteerde lijst en schakel het selectievakje uit blanks optie onder het vervolgkeuzemenu. Zie screenshot:
4. En klik vervolgens op OK, zijn alle niet-lege cellen uitgefilterd zoals in de volgende schermafbeelding:
5. Eindelijk kunt u de gefilterde gegevens kopiëren en op elke gewenste locatie plakken.
Note: Zowel waarden als formules worden op deze manier van kracht.
Selecteer niet-lege cellen in één keer |
| Klik voor een gratis proefversie met volledige functionaliteit binnen 30 dagen! |
 |
Kopieer en plak alleen niet-lege cellen met matrixformule
Om alleen de niet-lege cellen te kopiëren en te plakken, kunt u ook de volgende matrixformule toepassen.
1. Voer naast uw gegevens de volgende formule in een lege cel in:
=LOOKUP("zzzzz",CHOOSE({1,2},"",INDEX(A:A,SMALL(IF($A$1:$A$15<>"",ROW($A$1:$A$15)),ROWS($B$1:B1)))))
Note: In de bovenstaande formule, A1: A15 is de datalijst die u wilt gebruiken. U kunt deze naar wens aanpassen.
2. Druk vervolgens op Shift+Ctrl+Enter toetsen samen en selecteer vervolgens cel B1, en sleep de vulgreep naar het bereik waarin u deze formule wilt opnemen, en alle niet-lege celwaarden zijn geëxtraheerd. Zie screenshot:
3. Omdat het formules zijn, moet u ze kopiëren en plakken als waarden wanneer u ze naar een andere plaats kopieert.
Note: Deze formule is alleen beschikbaar voor de constanten, niet van toepassing op de formulecellen.
Kopieer en plak alleen niet-lege cellen met VBA-code
Als u geïnteresseerd bent in VBA-code, kunt u de volgende code uitvoeren om deze taak te voltooien.
1. Houd de ALT + F11 toetsen, en het opent de Microsoft Visual Basic for Applications-venster.
2. Klikken Invoegen > Moduleen plak de volgende code in het Module Venster.
VBA-code: kopieer en plak alleen niet-lege cellen in Excel
Sub PasteNotBlanks()
'Update 20140325
Dim rng As Range
Dim InputRng As Range, OutRng As Range
xTitleId = "KutoolsforExcel"
Set InputRng = Application.Selection
Set InputRng = Application.InputBox("Range :", xTitleId, InputRng.Address, Type:=8)
If InputRng.Columns.Count > 1 Then
MsgBox "Please select one column."
Exit Sub
End If
Set OutRng = Application.InputBox("Out put to (single cell):", xTitleId, Type:=8)
InputRng.SpecialCells(xlCellTypeConstants).Copy Destination:=OutRng.Range("A1")
End Sub
3. Druk vervolgens op F5 toets om deze code uit te voeren, verschijnt er een promptvenster om u eraan te herinneren het gegevensbereik te selecteren dat u wilt gebruiken. Zie screenshot:
4. En klik vervolgens op OK, verschijnt er een ander promptvenster waarin u een cel kunt kiezen om de gegevens in te plaatsen.
5. Klik OK om deze code te voltooien, en alleen de niet-lege celwaarden zijn op de door u opgegeven positie geplakt.
Note: Deze code is alleen beschikbaar voor de constanten.
Kopieer en plak alleen niet-lege cellen met Kutools voor Excel
Is er een veel gemakkelijkere manier dan hierboven? Natuurlijk, Kutools for Excel's Selecteer Niet-lege celHet hulpprogramma kan u helpen om eerst de niet-lege cellen te selecteren en ze vervolgens te kopiëren en te plakken.
| Kutools for Excel, met meer dan 300 handige functies, maakt uw werk eenvoudiger. | ||
Na gratis installeren Kutools voor Excel, doe het als volgt:
1. Selecteer het celbereik en klik op Kutools > kies > Selecteer niet-lege cellen. Zie screenshot:
2. Vervolgens worden de niet-lege cellen geselecteerd, druk op CTRL + C om ze te kopiëren, ga dan naar een cel selecteren waar u het gewenste resultaat wilt uitvoeren, druk op Ctrl + V om geselecteerde niet-lege cellen te plakken. Zie screenshot:
Kopieer en plak alleen niet-lege cellen
| Kutools for Excel: 300+ functies die u in Excel moet hebben, 30 dagen gratis proefperiode vanaf hier |
Beste Office-productiviteitstools
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...
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!
