Jak rozdělit dlouhý sloupec na více sloupců v aplikaci Excel?
Rozdělte dlouhý sloupec na více sloupců pomocí VBA
Rozdělte dlouhý sloupec na více sloupců pomocí Kutools for Excel
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:
 |
 |
 |
|
 |
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.
Rozdělte dlouhý sloupec na více sloupců pomocí Kutools for 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 for Excel rychle a snadno převést dlouhý sloupec na pevný počet sloupců.
| Kutools for Excel, s více než 300 užitečné funkce, které vám usnadní práci. |
Po instalaci Kutools for Excel, prosím, postupujte takto:(Stažení zdarma Kutools for Excel Nyní!)
1. Vyberte data sloupce, která chcete rozdělit, a klikněte na Kutools > Rozsah > Rozsah transformace. Viz snímek obrazovky:
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:
3. cvaknutí Ok a vyberte jednu buňku, aby se rozdělila rozdělená data. Viz screenshot:
4. cvaknutí OK dokončit operace. Nyní byla data dlouhého sloupce rozdělena do tří sloupců.
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.
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 for 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 všechny funkce 30 zkušební dny zdarma! |
 |
| Kutools for Excel: s více než 300 praktickými doplňky aplikace Excel, které lze zdarma vyzkoušet bez omezení 30 dnů. |
Nejlepší nástroje pro produktivitu v kanceláři
Rozšiřte své excelentní dovednosti pomocí Kutools for Excela 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áší rozhraní s kartami do Office 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!
