Note: The other languages of the website are Google-translated. Back to English
English English

Jak rozdělit dlouhý sloupec na více sloupců v aplikaci Excel?

doc rozdělit do více sloupců 4
Pokud máte v Excelu dlouhý sloupcový údaj, který bude při jejich prohlížení problematický. Ale teď, když můžete rozdělit takový dlouhý seznam do více sloupců v aplikaci Excel, bude to pohodlné prohlížení.
Rozdělte dlouhý sloupec na více sloupců pomocí VBA
Rozdělte dlouhý sloupec na více sloupců pomocí Kutools pro Excel dobrý nápad3

šipka modrá pravá bublina Rozdělte dlouhý sloupec na více sloupců pomocí VBA

1. lis Alt + F11 klíče otevřete Microsoft Visual Basic pro aplikace okno.

2. cvaknutí Vložit > Modul a zkopírujte následující kód VBA do vyskakovacího okna.

VBA: Rozdělte dlouhý sloup na více sloupců.

Sub SplitColumn()
	'Updateby20141106
	Dim rng As Range
	Dim InputRng As Range
	Dim OutRng As Range
	Dim xRow As Integer
	Dim xCol As Integer
	Dim xArr As Variant
	xTitleId     = "KutoolsforExcel"
	Set InputRng = Application.Selection
	Set InputRng = Application.InputBox("Range :", xTitleId, InputRng.Address, Type: = 8)
	xRow         = Application.InputBox("Rows :", xTitleId)
	Set OutRng   = Application.InputBox("Out put to (single cell):", xTitleId, Type: = 8)
	Set InputRng = InputRng.Columns(1)
	xCol         = InputRng.Cells.Count / xRow
	ReDim xArr(1 To xRow, 1 To xCol + 1)
	For i = 0 To InputRng.Cells.Count - 1
		xValue = InputRng.Cells(i + 1)
		iRow = i Mod xRow
		iCol = VBA.Int(i / xRow)
		xArr(iRow + 1, iCol + 1) = xValue
	Next
	OutRng.Resize(UBound(xArr, 1), UBound(xArr, 2)).Value = xArr
End Sub

3. cvaknutí Běh nebo stiskněte tlačítko F5 Chcete-li spustit VBA, zobrazí se dialogové okno pro výběr seznamu dat a poté klepněte na OK Chcete-li v dalším dialogovém okně zadat, kolik řádků v jednom sloupci potřebujete, klikněte na OK a vyberte buňku pro výstup výsledku. Zobrazit snímky obrazovky:

doc-split-to-multiple-sloupce-1
doc-šipka
doc-split-to-multiple-sloupce-2
doc-šipka
doc-split-to-multiple-sloupce-3


4. cvaknutí OK, pak můžete vidět, že dlouhý sloupec je rozdělen na více sloupců a každý sloupec má 15 buněk.
doc-split-to-multiple-sloupce-4


šipka modrá pravá bublina Rozdělte dlouhý sloupec na více sloupců pomocí Kutools pro Excel

Možná někteří z vás neradi používají kód VBA, naštěstí můžete použít Rozsah transformace užitečnost Kutools pro Excel rychle a snadno převést dlouhý sloupec na pevný počet sloupců.

Kutools pro Excel, s více než 300 užitečné funkce, které vám usnadní práci. 

Po instalaci Kutools pro Excel, prosím, postupujte takto:(Zdarma ke stažení Kutools pro Excel nyní!)

1. Vyberte data sloupce, která chcete rozdělit, a klikněte na Kutools > Rozsah > Rozsah transformace. Viz snímek obrazovky:
doc split kte 1

2. Ve vyskakovacím dialogovém okně zaškrtněte Jeden sloupec k rozsahu možnost, pak zkontrolujte Pevná hodnota možnost a do textového pole zadejte požadovaný počet sloupců. Viz screenshot:doc split kte 2

3. cvaknutí Ok a vyberte jednu buňku, aby se rozdělila rozdělená data. Viz screenshot:
doc split kte 3

4. cvaknutí OK dokončit operace. Nyní byla data dlouhého sloupce rozdělena do tří sloupců.
doc split kte 4

Je to jednodušší než kód VBA? S Trozsah ransform nástroj, můžete převést řádek na rozsah, rozsah na řádek nebo jeden sloupec.

šipka modrá pravá bublina Transponujte jeden sloupec / řádek do rozsahu nebo naopak



Rychle rozdělte jednu buňku do sloupců nebo řádků na základě oddělovače

V aplikaci Excel je rozdělení buňky na sloupce zdlouhavé s průvodcem krok za krokem. Ale s Kutools pro Excel's Rozdělit buňky nástroj, můžete: 1, převést jednu buňku do sloupců nebo řádků na základě oddělovače; 2, převést řetězec na text a číslo; 3, převést řetězec na základě konkrétní šířky, s kliknutími.  Kliknutím zobrazíte 30denní bezplatnou zkušební verzi s plnou funkčností!
doc rozdělená buňka
 
Kutools pro Excel: s více než 300 praktickými doplňky Excel, můžete vyzkoušet bez omezení za 30 dní.

Nejlepší kancelářské nástroje produktivity

Kutools pro Excel řeší většinu vašich problémů a zvyšuje vaši produktivitu o 80%

  • Opakované použití: Rychle vložte složité vzorce, grafy a cokoli, co jste dříve používali; Šifrovat buňky s heslem; Vytvořte seznam adresátů a posílat e-maily ...
  • Super Formula Bar (snadno upravit více řádků textu a vzorce); Rozložení pro čtení (snadno číst a upravovat velké množství buněk); Vložit do filtrovaného rozsahu...
  • Sloučit buňky / řádky / sloupce bez ztráty dat; Rozdělit obsah buněk; Zkombinujte duplicitní řádky / sloupce... Zabraňte duplicitním buňkám; Porovnat rozsahy...
  • Vyberte možnost Duplikovat nebo Jedinečný Řádky; Vyberte prázdné řádky (všechny buňky jsou prázdné); Super hledání a fuzzy hledání v mnoha sešitech; Náhodný výběr ...
  • Přesná kopie Více buněk beze změny odkazu na vzorec; Automaticky vytvářet reference do více listů; Vložte odrážky, Zaškrtávací políčka a další ...
  • Extrahujte text, Přidat text, Odebrat podle pozice, Odebrat mezeru; Vytváření a tisk mezisoučtů stránkování; Převod mezi obsahem buněk a komentáři...
  • Super filtr (uložit a použít schémata filtrů na jiné listy); Rozšířené řazení podle měsíce / týdne / dne, frekvence a dalších; Speciální filtr tučnou kurzívou ...
  • Kombinujte sešity a pracovní listy; Sloučit tabulky na základě klíčových sloupců; Rozdělte data do více listů; Dávkový převod xls, xlsx a PDF...
  • Více než 300 výkonných funkcí. Podporuje Office / Excel 2007-2019 a 365. Podporuje všechny jazyky. Snadné nasazení ve vašem podniku nebo organizaci. Kompletní funkce 30denní bezplatná zkušební verze. 60denní záruka vrácení peněz.
karta kte 201905

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 omezuje stovky kliknutí myší každý den!
officetab dno
Komentáře (3)
Zatím žádné hodnocení. Buďte první, kdo ohodnotí!
Tento komentář byl moderátorem webu minimalizován
Děkuji!
Tento komentář byl moderátorem webu minimalizován
Děkuji mnohokrát! Je velký problém zkopírovat webovou tabulku do Excelu. Díky vašemu skriptu se mi to konečně podařilo.
Tento komentář byl moderátorem webu minimalizován
Vážně úžasné...
Zatím zde nejsou žádné komentáře
Zanechat své připomínky
Odesílání jako host
×
Ohodnoťte tento příspěvek:
0   Postavy
Doporučená umístění