Obsah
Někdy potřebujeme umístit prázdný řádek do našeho Excel list pro zadávání zmeškaných dat. V tomto článku se seznámíte s metodami v aplikaci Excel na Vložit řádek níže .
Abych vám pomohl lépe porozumět, použiji jako příklad ukázkový soubor dat. Následující soubor dat představuje Prodejce , Produkt a Čisté tržby .
Stáhnout cvičebnici
Stáhněte si následující pracovní sešit a procvičujte sami.
Vložení řádku níže.xlsm5 efektivních metod v aplikaci Excel pro vložení řádku níže
1. Metoda Excel VBA pro vložení řádku níže
Řádek pod vybranou buňku můžeme snadno přidat v položce Excel pomocí VBA kód. V této metodě použít VBA na Vložte a Řádek níže .
KROKY:
- Nejprve vyberte Visual Basic funkce pod Vývojář kartu.
- Dále vyberte Modul pod Vložte tab.
- Zobrazí se okno.
- Tam zkopírujte Kód a vložte ji do Modul okno.
Sub PlaceRowBelow() Dim rnge As Range Application.ScreenUpdating = False Set rnge = ActiveCell.Offset(1, 0) rnge.EntireRow.Select Selection.Insert Shift:=xlDown Selection.ClearFormats Application.ScreenUpdating = True End Sub
- Poté zavřete Visual Basic okno.
- Nyní vyberte buňku D5 .
- Pak vyberte Makra pod Vývojář tab.
- Zde vyberte možnost Makro název ' PlaceRowBelow '.
- A pak stiskněte Spustit .
- Nakonec přidá řádek pod vybranou buňku.
Další informace: Jak vložit řádek v aplikaci Excel ( 5 metod)
2. Aplikace Excel vloží řádek za každý další řádek
Tato metoda přidá Řádek po Každý druhý řádek na adrese Excel .
2.1 Prázdný sloupec aplikace Excel a funkce řazení pro vložení řádku
Zde využijeme Prázdný sloupec a Třídit funkce na Vložte řádek za každým druhým řádkem.
KROKY:
- Nejprve vyberte sloupec úplně vlevo.
- Poté klikněte pravým tlačítkem myši a vyberte možnost Vložte možnost ze seznamu.
- Jednoduše přidá sloupec vlevo.
- Vybrat buňku A4 .
- Tam zadejte Prázdný sloupec .
- Poté vyplňte Sloupec sériově až do konce dat, jako na následujícím obrázku.
- Opět vyplňte sloupec postupně, jak je znázorněno na obrázku níže.
- Nyní vyberte rozsah buněk kromě záhlaví.
- Poté klikněte pravým tlačítkem myši.
- Tam vyberte Třídit od nejmenšího po největší z Třídit možnosti.
- Poté uvidíte, že se vaše datová sada mezi sebou přeskupuje.
- Nakonec jen Odstranit na Prázdný sloupec a získáte požadovaný výstup.
2.2 Vložení řádku pomocí kódu Excel VBA
Další postup přidávání řádků za každý druhý řádek je pomocí VBA kód.
KROKY:
- Na začátku vyberte rozsah buněk, se kterými chcete pracovat.
- Dále vyberte Visual Basic funkce pod Vývojář tab.
- Pak vyberte Modul pod Vložte tab.
- Zobrazí se okno.
- Tam zkopírujte Kód a vložte ji do Modul okno.
Sub PlaceRows() Dim rnge As Range Dim RowNumber As Integer Dim x As Integer Set rnge = Selection RowNumber = rnge.EntireRow.Count For x = 1 To RowNumber ActiveCell.Offset(1, 0).EntireRow.Insert ActiveCell.Offset(2, 0).Select Next x End Sub
- Poté zavřete Visual Basic a vyberte možnost Makra pod Vývojář tab.
- Tam vyberte PlaceRows v Makro jméno a stiskněte Spustit .
- Nakonec se vám za každým druhým řádkem zobrazí prázdné řádky.
Přečtěte si více: VBA pro vložení řádku v aplikaci Excel (11 metod)
3. Zadání řádku pod prázdnou buňkou v aplikaci Excel
V této části si ukážeme, jak. použít funkci IF na Vložení řádků po Prázdná buňka na adrese Excel .
KROKY:
- Nejprve vyberte buňku F5 a zadejte vzorec:
=IF(B4"","",1)
- Poté stiskněte tlačítko Vstupte na a přetáhněte ji na poslední řádek datové sady.
- Nyní vyberte celou Sloupec F .
- Pak vyberte Najít z Najít & amp; Vybrat možnosti v Úpravy skupina pod Home tab.
- Zobrazí se dialogové okno.
- Tam zadejte 1 na adrese Zjistěte, co .
- Poté stiskněte tlačítko Najít vše .
- Dialog se rozbalí tak, jak je znázorněno na obrázku níže.
- V něm vyberte řádky s hodnotou 1 a stiskněte Zavřít .
- A pak uvidíte, že buňky s hodnotou 1 jsou vybírány automaticky.
- Nyní stiskněte klávesy Ctrl ' a ' + ' společně.
- Tam vyberte Celá řada ve vyskakovacím dialogovém okně a stiskněte tlačítko OK .
- Nakonec uvidíte očekávaný výsledek, jako na následujícím obrázku.
Přečtěte si více: Jak vložit řádek do buňky v aplikaci Excel (3 jednoduché způsoby)
Podobná čtení
- Makro aplikace Excel pro vkládání řádků (8 metod)
- Makro VBA pro vložení řádku v aplikaci Excel na základě kritérií (4 metody)
- Jak přesunout řádek v aplikaci Excel (6 metod)
- Jak vložit prázdný řádek za každý n-tý řádek v aplikaci Excel (2 snadné metody)
- Vkládání řádků v aplikaci Excel na základě hodnoty buňky pomocí VBA (2 metody)
4. Vložení řádku aplikace Excel pomocí funkce mezisoučtu
Zde si ukážeme, jak Vložte a Řádek po každém Prodejce jméno v Excel .
KROKY:
- Nejprve vyberte rozsah buněk, se kterými chcete pracovat.
- Dále vyberte Mezisoučet funkce z Náčrt skupina pod Data tab.
- Zobrazí se dialogové okno.
- Tam vyberte Prodejce z Při každé změně ' seznam, Hrabě z Použijte funkci ', zkontrolujte Čisté tržby v Přidejte mezisoučet k ' a zbytek nechte tak, jak je.
- Nakonec stiskněte OK .
- Po stisknutí OK , zobrazí se vám datová sada jako na obrázku níže.
- Nyní vyberte Přejít na stránku Specia l od Najít & Vybrat možnosti v Úpravy skupina pod Home tab.
- Zobrazí se dialogové okno.
- Zde zkontrolujte pouze Čísla možnost v Vzorce a stiskněte OK .
- Po stisknutí OK , uvidíte, že jsou vybrána všechna čísla počítání.
- Nyní stiskněte tlačítko Ctrl ' a ' + ' společně.
- Zde vyberte možnost Celá řada ve vyskakovacím dialogovém okně a stiskněte OK .
- A pak se za každý řádek vloží prázdný řádek. Prodejce název.
- Poté vyberte rozsah buněk.
- Nyní vyberte Mezisoučet z Náčrt skupina pod Data tab.
- Tisk Odstranění všech ve vyskakovacím dialogovém okně.
- A nakonec se dočkáte kýženého výsledku.
Přečtěte si více: Jak vložit celkový řádek v aplikaci Excel (4 snadné metody)
5. Umístění řádku na dno tabulky pomocí nástroje Excel VBA
V této metodě si ukážeme, jak přidat prázdnou položku Řádek na Spodní část o Tabulka na adrese Excel .
KROKY:
- Nejprve vyberte Visual Basic funkce pod Vývojář tab.
- Zobrazí se okno.
- Tam vyberte Modul pod Vložte tab.
- Objeví se další okno.
- Tam zkopírujte Kód a vložte ji do Modul okno.
Sub PlaceRowUnderTable() Dim sheet As Worksheet Set sheet = ActiveSheet Table_Title = InputBox("Název tabulky: ") Dim list As ListObject Set list = sheet.ListObjects(Table_Title) list.ListRows.Add End Sub
- Poté zavřete Visual Basic okno.
- Pak vyberte Makra pod Vývojář tab.
- Tam vyberte PlaceRowUnderTable na adrese Název makra a stiskněte Spustit .
- Zobrazí se dialogové okno.
- Typ Tabulka1 na adrese Název tabulky a stiskněte OK .
- Nakonec se pod tabulkou zobrazí prázdný řádek.
Přečtěte si více: Makro aplikace Excel pro přidání řádku do spodní části tabulky
Závěr
Nyní budete moci Vložte a Řádek níže na adrese Excel pomocí výše popsaných metod. Používejte je i nadále a dejte nám vědět, pokud máte nějaké další způsoby, jak tento úkol provést. Nezapomeňte do níže uvedeného komentáře napsat připomínky, návrhy nebo dotazy, pokud nějaké máte.