Hvordan opdeles en lang kolonne i flere kolonner i Excel?
Opdel lang kolonne i flere kolonner med VBA
Opdel en lang kolonne i flere kolonner med Kutools til Excel
Opdel lang kolonne i flere kolonner med VBA
1. Trykke Alt + F11 nøgler sammen for at åbne Microsoft Visual Basic til applikationer vindue.
2. klik indsatte > Moduler og kopier den følgende VBA-kode til det poppede ud-vindue.
VBA: Opdel lang kolonne i flere kolonner.
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. klik Kør knappen eller tryk på F5 nøgle til at køre VBA, og der vises en dialogboks til valg af datalisten, og klik derefter på OK for at gå til at specificere, hvor mange rækker i en kolonne du har brug for i den næste dialog, og klik derefter på OK og vælg en celle for at output resultatet. Se skærmbilleder:
 |
 |
 |
|
 |
4. klik OK, så kan du se den lange kolonne er opdelt i flere kolonner, og hver kolonne har 15 celler.
Opdel en lang kolonne i flere kolonner med Kutools til Excel
Måske kan nogle af jer ikke lide at bruge VBA-kode, heldigvis kan du bruge Transformér rækkevidde nytte af Kutools til Excel til hurtigt og nemt at konvertere en lang kolonne til et fast antal kolonner.
| Kutools til Excel, med mere end 300 praktiske funktioner, der gør dine job lettere. |
Efter installation Kutools til Excel, gør venligst som nedenfor:（Gratis download Kutools til Excel nu!)
1. Vælg de søjledata, du vil opdele, og klik derefter på Kutools > Range > Transformér rækkevidde. Se skærmbillede:
2. Kontroller i dialogboksen, der vises En kolonne til rækkevidde valgmulighed, og tjek derefter Fast værdi indstilling, og skriv det antal kolonner, du har brug for, i tekstboksen. Se skærmbillede:
3. klik Ok og vælg en enkelt celle for at lægge de opdelte data ud. Se skærmbillede:
4. klik OK for at afslutte operationerne. Nu er de lange kolonnedata opdelt i tre kolonner.
Er det lettere end VBA-kode? Med Tomforme rækkevidde værktøj, kan du konvertere en række til rækkevidde, en række til en række eller en kolonne.
Transponere enkelt kolonne / række til et interval eller omvendt
Del hurtigt en celle i kolonner eller rækker baseret på afgrænser
|
| I Excel er det kedeligt med guiden trin for trin at opdele en celle i kolonner. Men med Kutools til Excel's Opdel celler værktøj, du kan: 1, konvertere en celle til kolonner eller rækker baseret på afgrænser; 2, konverter streng til tekst og nummer; 3, konverter streng baseret på specifik bredde med klik. Klik for fuld 30 dages gratis prøveperiode! |
 |
| Kutools til Excel: med mere end 300 praktiske Excel-tilføjelsesprogrammer, gratis at prøve uden begrænsning på 30 dage. |
Bedste kontorproduktivitetsværktøjer
Overlad dine Excel-færdigheder med Kutools til Excel, og oplev effektivitet som aldrig før. Kutools til Excel tilbyder over 300 avancerede funktioner for at øge produktiviteten og spare tid. Klik her for at få den funktion, du har mest brug for...
Fanen Office bringer en grænseflade til et kontor med Office, og gør dit arbejde meget lettere
- Aktiver redigering og læsning af faner i Word, Excel, PowerPoint, Publisher, Access, Visio og Project.
- Åbn og opret flere dokumenter i nye faner i det samme vindue snarere end i nye vinduer.
- Øger din produktivitet med 50 % og reducerer hundredvis af museklik for dig hver dag!
