Jak přesunout každý druhý řádek do sloupců v aplikaci Excel?

Při práci s daty v Excelu, zejména s importovanými nebo nestrukturovanými datovými sadami, můžete často najít názvy a související hodnoty uspořádané svisle do jednoho sloupce. Aby byla tato data čitelnější a použitelnější, je často nutné je převést do tabulkového formátu – každý druhý řádek přesunout do sloupců.

• Přesunout každý druhý řádek do sloupce se vzorci
• Přesuňte každý druhý řádek do sloupce pomocí Kutools pro Excel
• Přesuňte každý druhý řádek do sloupce pomocí VBA

Přesunout každý druhý řádek do sloupce se vzorci

Toto je přímočará metoda, která využívá funkci INDEX aplikace Excel k extrahování střídavých řádků a jejich zobrazení jako sloupců. Pokud chcete převést jména do jednoho sloupce a stáří do dalšího sloupce. Použijte prosím následující vzorce:

1. V buňce C2 zadejte do prázdné buňky následující vzorec a podle potřeby přetáhněte vzorec dolů. Tento vzorec načte hodnotu z každého druhého řádku počínaje řádkem 2 (jména).

=INDEX($A:$A, (ROW(A1)-1)*2 + 2)

2. Do buňky D2 zadejte níže uvedený vzorec pro extrahování alternativních dat, přetažením vzorce dolů vyplňte buňky.

 =INDEX($A:$A, (ROW(A1)-1)*2 + 3)

Přesuňte každý druhý řádek do sloupce pomocí Kutools pro Excel

Pokud dáváte přednost uživatelsky přívětivějšímu řešení bez vzorců, Kutools pro Excel nabízí funkci, která vám umožní bez námahy transponovat řádky do sloupců.

Po instalaci Kutools pro Excel proveďte následující kroky:

1. Klikněte na Kutools > Rozsah > Transformovat rozsah.
   
2. V dialogu Rozsah transformace nastavte následující operace:
   • Vyberte rozsah, který chcete přesunout na každý druhý řádek
   • Zaškrtněte Single column to range v sekci Transform Type,
   • A pak zaškrtněte Pevná hodnota a poté vyberte nebo zadejte 2 do seznamu v části Řádky na záznam.
   • Nakonec klikněte na tlačítko OK.
     
3. V následujícím okně s výzvou vyberte jednu buňku pro vypsání výsledku, viz snímek obrazovky:
   
4. Klikněte na OK, Kutools automaticky přesune každý druhý řádek do samostatných sloupců.
   

Přesuňte každý druhý řádek do sloupce s kódem VBA

Pokud často potřebujete provést tento úkol, makro VBA může proces automatizovat, takže je rychlejší a efektivnější.

1. Současným stisknutím kláves F11 + Alt na klávesnici otevřete okno Microsoft Visual Basic for Applications.

2. Poté klikněte na Vložit > Modul pro vložení nového okna modulu. A pak zkopírujte následující kód VBA do okna.

VBA: Přesuňte každý druhý řádek do sloupce.

Sub MoveRange()
'Updateby Extendoffice
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)
Set OutRng = Application.InputBox("Out put to (single cell):", xTitleId, Type:=8)
Set InputRng = InputRng.Columns(1)
For i = 1 To InputRng.Rows.Count Step 2
    OutRng.Resize(1, 2).Value = Array(InputRng.Cells(i, 1).Value, InputRng.Cells(i + 1, 1).Value)
    Set OutRng = OutRng.Offset(1, 0)
Next
End Sub

3. Klepněte na tlačítko Spustit nebo na klávesu F5 na klávesnici a zobrazí se dialogové okno, ve kterém můžete vybrat rozsah, který chcete přesunout. Viz snímek obrazovky:

4. Poté klikněte na OK pro zobrazení dalšího dialogu pro výběr buňky pro výstup výsledku. Viz snímek obrazovky:

5. Klikněte na OK a výsledek se zobrazí níže:

🎯 Závěr:

Každá metoda pro přesun každého druhého řádku do sloupce v aplikaci Excel má své vlastní výhody v závislosti na vašich potřebách:

• Metoda vzorce: Nejlepší pro rychlé, jednorázové úkoly s malými datovými sadami. Nevyžaduje žádné další nástroje, ale může se zpomalit při velkém rozsahu dat.
• Kutools pro Excel: Ideální pro uživatele, kteří preferují jednoduché řešení založené na kliknutí bez složitých vzorců nebo kódování. Kutools poskytuje uživatelsky přívětivé rozhraní pro rychlé transformace.
• Makro VBA: Nejlepší volba pro automatizaci a opakující se úkoly, zejména s velkými datovými sadami. Vyžaduje základní znalosti kódování, ale nabízí maximální flexibilitu.

Vyberte si metodu, která vyhovuje vašim potřebám, ať už pracujete s malou sadou dat nebo potřebujete škálovatelnější řešení pro větší datové sady. Pokud máte zájem prozkoumat další tipy a triky pro Excel, náš web nabízí tisíce výukových programů, které vám pomohou zvládnout Excel.

Relativní články:

• Vyberte každý sudý řádek v aplikaci Excel
• Zkopírujte každý druhý řádek