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 Kutools voor Excel

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 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 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.

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 met de filterfunctie

Dé 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.

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.