Hur kopierar och klistrar jag bara celler som inte är tomma i Excel?
De flesta av oss kan drabbas av detta problem, när vi kopierar en lista med data som innehåller några tomma celler och sedan klistrar in dem i en annan kolumn, kommer de tomma cellerna också att klistras in. Det här är väldigt irriterande när vi inte behöver blankorna och bara vill klistra in icke-tomma celler. I det här fallet, hur kan vi bara kopiera och klistra in icke-tomma celler i Excel snabbt och bekvämt? Här är några snabba knep för dig att lösa det:
Kopiera och klistra bara in celler som inte är tomma med kommandot Gå till special
Kopiera och klistra in endast icke-tomma celler med filterfunktionen
Kopiera och klistra in endast celler som inte är tomma med Array Formula
Kopiera och klistra in endast icke-tomma celler med VBA-kod
Kopiera och klistra in endast icke-tomma celler med Kutools för Excel 
Kopiera och klistra bara in celler som inte är tomma med kommandot Gå till special
Med Gå till Special kommandot kan du först välja all data och sedan kopiera och klistra in dem till en annan plats.
1. Välj din lista med data som du vill använda.
2. Klicka sedan Hem > Hitta och välj > Gå till Special, se skärmdump:
3. I Gå till Special dialogruta, kontrollera Konstant alternativ, se skärmdump:
4. Klicka sedan OK, och endast värdecellerna har valts i listan.
5. Kopiera och klistra sedan in data till en plats du vill ha. Och bara de icke-tomma cellvärdena har klistrats in. Se skärmdump:
Anmärkningar: Denna metod är endast tillgänglig för konstanterna, den tillämpas inte på formelcellerna.
Kopiera och klistra in endast icke-tomma celler med filterfunktionen
Smakämnen Filter funktionen kan hjälpa dig att filtrera de icke-tomma cellerna först och sedan kan du kopiera och klistra in dem i andra celler efter behov.
2. Klicka Data > Filter, se skärmdump:
3. Klicka sedan på rullgardinsmenyn till höger i cellen i den valda listan och avmarkera kryssrutan Blanks under rullgardinsmenyn. Se skärmdump:
4. Och klicka sedan på OK, alla icke-tomma celler har filtrerats ut enligt följande skärmdump:
5. Äntligen kan du kopiera de filtrerade data och klistra in dem till valfri plats du behöver.
Anmärkningar: Både värden och formler träder i kraft genom att använda detta sätt.
Välj icke-tomma celler på en gång |
| Klicka för gratis testversion av alla funktioner om 30 dagar! |
 |
Kopiera och klistra in endast celler som inte är tomma med Array Formula
Om du bara vill kopiera och klistra in celler som inte är tomma kan du använda följande matrisformel.
1. Förutom dina data anger du följande formel i en tom cell:
=LOOKUP("zzzzz",CHOOSE({1,2},"",INDEX(A:A,SMALL(IF($A$1:$A$15<>"",ROW($A$1:$A$15)),ROWS($B$1:B1)))))
Anmärkningar: I ovanstående formel, A1: A15 är den datalista som du vill använda. Du kan ändra den efter dina behov.
2. Tryck sedan på Skift + Ctrl + Enter tangenter tillsammans och välj sedan cell B1 och dra fyllningshandtaget till det område som du vill innehålla denna formel och alla icke-tomma cellvärden har extraherats. Se skärmdump:
3. Eftersom de är formler bör du kopiera och klistra in dem som värden när du kopierar dem till en annan plats.
Anmärkningar: Denna formel är endast tillgänglig för konstanterna, inte tillämpad på formelcellerna.
Kopiera och klistra in endast icke-tomma celler med VBA-kod
Om du är intresserad av VBA-kod kan du utföra följande kod för att slutföra uppgiften.
1. Håll ner ALT + F11 knapparna och det öppnar Microsoft Visual Basic for Applications-fönstret.
2. Klicka Insert > Modulernaoch klistra in följande kod i Modulfönster.
VBA-kod: Kopiera och klistra in endast icke-tomma celler i 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. Tryck sedan på F5 -knappen för att köra den här koden visas en snabbruta som påminner dig om att välja det dataområde som du vill använda. Se skärmdump:
4. Och klicka sedan på OKkommer en annan snabbruta att dyka upp för att låta dig välja en cell för att lägga in data.
5. Klicka OK för att avsluta den här koden, och endast de icke-tomma cellvärdena har klistrats in i din angivna position.
Anmärkningar: Den här koden är endast tillgänglig för konstanterna.
Kopiera och klistra in endast icke-tomma celler med Kutools för Excel
Finns det något mycket enklare sätt än ovan? Självklart, Kutools för Excel's Välj Nonblank Cells-verktyget kan hjälpa dig att välja icke-tomma celler först och sedan kopiera och klistra in dem.
| Kutools för Excel, med mer än 300 praktiska funktioner, gör dina jobb enklare. | ||
Efter gratis installation Kutools för Excel, gör så här:
1. Markera cellområdet och klicka Kutools > Välja > Välj icke-tomma celler. Se skärmdump:
2. Sedan väljs de icke-tomma cellerna, tryck på Ctrl + C för att kopiera dem och välj sedan en cell där du vill mata ut det passerade resultatet, tryck på Ctrl + V för att klistra in valda icke-tomma celler. Se skärmdump:
Kopiera och klistra in en cell som inte är tom
| Kutools för Excel: 300+ funktioner du måste ha i Excel, 30-dagars gratis testperiod härifrån |
Bästa kontorsproduktivitetsverktyg
Uppgradera dina Excel-färdigheter med Kutools för Excel och upplev effektivitet som aldrig förr. Kutools för Excel erbjuder över 300 avancerade funktioner för att öka produktiviteten och spara tid. Klicka här för att få den funktion du behöver mest...
Fliken Office ger ett flikgränssnitt till Office och gör ditt arbete mycket enklare
- Aktivera flikredigering och läsning i Word, Excel, PowerPoint, Publisher, Access, Visio och Project.
- Öppna och skapa flera dokument i nya flikar i samma fönster, snarare än i nya fönster.
- Ökar din produktivitet med 50 % och minskar hundratals musklick för dig varje dag!
