Jak kopírovat a vložit pouze neprázdné buňky v aplikaci Excel?
Většina z nás může být tímto problémem postižena, když zkopírujeme seznam dat, která obsahují nějaké prázdné buňky, a potom je vložíme do jiného sloupce, prázdné buňky se také vloží. To je velmi nepříjemné, když nepotřebujeme mezery a chceme vložit pouze neprázdné buňky. Jak bychom v tomto případě mohli rychle a pohodlně zkopírovat a vložit pouze neprázdné buňky v aplikaci Excel? Zde je několik rychlých triků, jak to vyřešit:
Zkopírujte a vložte pouze neprázdné buňky pomocí příkazu Přejít na speciální
Zkopírujte a vložte pouze neprázdné buňky pomocí funkce Filtr
Zkopírujte a vložte pouze neprázdné buňky pomocí vzorce pole
Zkopírujte a vložte pouze neprázdné buňky s kódem VBA
Zkopírujte a vložte pouze neprázdné buňky pomocí programu Kutools pro Excel
Zkopírujte a vložte pouze neprázdné buňky pomocí příkazu Přejít na speciální
S Přejít na speciální příkaz, můžete nejprve vybrat všechna data a poté je zkopírovat a vložit na jiné místo.
1. Vyberte svůj seznam dat, která chcete použít.
2. Pak klikněte na tlačítko Domů > Najít a vybrat > Přejít na speciální, viz screenshot:
3. V Přejít na speciální v dialogovém okně zaškrtněte Konstanty možnost, viz screenshot:
4. Pak klikněte na tlačítko OKa v seznamu byly vybrány pouze buňky hodnot.
5. A potom zkopírujte a vložte data do požadovaného umístění. A byly vloženy pouze neprázdné hodnoty buněk. Viz screenshot:
Poznámka: Tato metoda je k dispozici pouze pro konstanty, neaplikuje se na buňky vzorce.
Zkopírujte a vložte pouze neprázdné buňky pomocí funkce Filtr
Projekt Filtr Funkce vám pomůže nejprve filtrovat neprázdné buňky a poté je můžete podle potřeby zkopírovat a vložit do jiných buněk.
2, klikněte Data > Filtr, viz screenshot:
3. Poté klikněte na rozevírací tlačítko v pravém rohu buňky ve vybraném seznamu a zrušte zaškrtnutí políčka Blanks možnost v rozevírací nabídce. Viz screenshot:
4. A pak klikněte na tlačítko OK, všechny neprázdné buňky byly odfiltrovány, jak ukazuje následující snímek obrazovky:
5. Nakonec můžete filtrovaná data zkopírovat a vložit na libovolné místo, které potřebujete.
Poznámka: Tímto způsobem se projeví hodnoty i vzorce.
Vyberte neprázdné buňky najednou |
Klikněte pro bezplatnou plně funkční zkušební verzi za 30 dní! |
Zkopírujte a vložte pouze neprázdné buňky pomocí vzorce pole
Chcete-li zkopírovat a vložit pouze neprázdné buňky, můžete také použít následující vzorec pole.
1. Kromě svých údajů zadejte do prázdné buňky následující vzorec:
=LOOKUP("zzzzz",CHOOSE({1,2},"",INDEX(A:A,SMALL(IF($A$1:$A$15<>"",ROW($A$1:$A$15)),ROWS($B$1:B1)))))
Poznámka: Ve výše uvedeném vzorci, A1: A15 je seznam dat, který chcete použít. Můžete jej podle potřeby změnit.
2. Pak stiskněte tlačítko Shift + Ctrl + Enter klíče dohromady a poté vyberte buňku B1 a přetáhněte úchyt výplně do rozsahu, ve kterém chcete tento vzorec obsahovat, a všechny neprázdné hodnoty buňky byly extrahovány. Viz screenshot:
3. Jelikož se jedná o vzorce, měli byste je při kopírování na jiné místo zkopírovat a vložit jako hodnoty.
Poznámka: Tento vzorec je k dispozici pouze pro konstanty, neaplikuje se na buňky vzorce.
Zkopírujte a vložte pouze neprázdné buňky s kódem VBA
Pokud vás zajímá kód VBA, můžete dokončit tento úkol spuštěním následujícího kódu.
1. Podržte ALT + F11 klíče a otevře se Okno Microsoft Visual Basic pro aplikace.
2, klikněte Vložit > Modula vložte následující kód do Okno modulu.
Kód VBA: Zkopírujte a vložte pouze neprázdné buňky v aplikaci 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. Pak stiskněte tlačítko F5 Po spuštění tohoto kódu se zobrazí výzva, která vám připomene výběr rozsahu dat, který chcete použít. Viz screenshot:
4. A pak klikněte na tlačítko OK, vyskočí další okno s výzvou, které vám umožní vybrat buňku pro vložení dat.
5. klikněte OK k dokončení tohoto kódu a do zadané polohy byly vloženy pouze neprázdné hodnoty buněk.
Poznámka: Tento kód je k dispozici pouze pro konstanty.
Zkopírujte a vložte pouze neprázdné buňky pomocí programu Kutools pro Excel
Existuje mnohem jednodušší způsob než výše? Samozřejmě, Kutools pro Excel's Vyberte neprázdnou buňkuNástroj vám pomůže nejprve vybrat neprázdné buňky a poté je zkopírovat a vložit.
Kutools pro Excel, s více než 300 užitečné funkce, které vám usnadní práci. | ||
Po instalace zdarma Kutools pro Excel, prosím, postupujte takto:
1. Vyberte oblast buněk a klepněte na Kutools > vybrat > Vyberte neprázdné buňky. Viz snímek obrazovky:
2. Poté jsou vybrány neprázdné buňky, stiskněte Ctrl + C Chcete-li je zkopírovat, vyberte buňku, do které chcete odeslat výsledek, stiskněte Ctrl + V vložit vybrané neprázdné buňky. Viz screenshot:
Zkopírujte a vložte pouze neprázdnou buňku
Kutools pro Excel: 300 a více funkcí, které musíte mít v Excelu, 30denní bezplatná zkušební verze odtud |
Nejlepší nástroje pro produktivitu v kanceláři
Rozšiřte své dovednosti Excel pomocí Kutools pro Excel a zažijte efektivitu jako nikdy předtím. Kutools for Excel nabízí více než 300 pokročilých funkcí pro zvýšení produktivity a úsporu času. Kliknutím sem získáte funkci, kterou nejvíce potřebujete...
Office Tab přináší do Office rozhraní s kartami a usnadňuje vám práci
- Povolte úpravy a čtení na kartách ve Wordu, Excelu, PowerPointu, Publisher, Access, Visio a Project.
- Otevřete a vytvořte více dokumentů na nových kartách ve stejném okně, nikoli v nových oknech.
- Zvyšuje vaši produktivitu o 50%a snižuje stovky kliknutí myší každý den!