Hvordan opdeles en kolonne hver anden række i Excel?
For eksempel har jeg en lang liste med data, og nu vil jeg opdele kolonnen i to lister ligeligt efter hver anden række som vist på følgende skærmbillede. Er der nogen gode måder at håndtere denne opgave i Excel?
Opdel en kolonne hver anden række med formler
Opdel en kolonne hver anden række med formler
Følgende formler kan hjælpe dig med hurtigt at opdele en kolonne i to kolonner efter hver anden række. Gør venligst som følger:
1. Indtast denne formel i en tom celle, C2, f.eks. =INDEX($A$2:$A$13,ROWS(C$1:C1)*2-1), se skærmbillede:
2. Træk derefter udfyldningshåndtaget ned, indtil fejlene vises i cellerne, se skærmbillede:
3. Indtast derefter en anden formel i celle D2, =INDEX($A$2:$A$13,ROWS(D$1:D1)*2), og træk udfyldningshåndtaget ned til cellerne, indtil fejlværdier vises, og kolonneværdierne er blevet opdelt i to kolonner hver anden række, se skærmbillede:
Opdel en kolonne hver anden række med VBA-kode
Hvis du er interesseret i VBA-kode, her, kan jeg tale om en kode for dig til at løse dette problem.
1. Hold nede ALT + F11 nøgler i Excel, og det åbner Microsoft Visual Basic til applikationer vindue.
2. Klik indsatte > Moduler, og indsæt følgende kode i Moduler Vindue.
VBA-kode: Opdel en kolonne i to kolonner hver anden række
Sub SplitEveryOther()
'Updateby Extendoffice
Dim Rng As Range
Dim InputRng As Range, OutRng As Range
Dim index As Integer
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 OutRng = OutRng.Range("A1")
num1 = 1
num2 = 1
For index = 1 To InputRng.Rows.Count
If index Mod 2 = 1 Then
OutRng.Cells(num1, 1).Value = InputRng.Cells(index, 1)
num1 = num1 + 1
Else
OutRng.Cells(num2, 2).Value = InputRng.Cells(index, 1)
num2 = num2 + 1
End If
Next
End Sub
3. Tryk derefter på F5 nøgle til at køre denne kode, og der vises et promptfelt for at minde dig om at vælge det dataområde, du vil opdele, se skærmbillede:
4. og klik OK, en anden promptboks vises for at lade dig vælge en celle for at indsætte resultatet, se skærmbillede:
5. Klik derefter på OK, og kolonnen er blevet opdelt i to kolonner af hver anden række. Se skærmbillede:
Opdel en kolonne hver anden række med Kutools til Excel
Hvis du vil lære flere nye ting, kan jeg anbefale et kraftfuldt værktøj --Kutools til Excel, Med Transformér rækkevidde værktøj, kan du hurtigt konvertere en enkelt række eller kolonne til en række celler og omvendt.
Kutools til Excel : med mere end 300 praktiske Excel-tilføjelsesprogrammer, gratis at prøve uden begrænsning på 30 dage. |
Efter installation Kutools til Excel, gør venligst som følger :( Gratis download Kutools til Excel nu )
1. Vælg de kolonnedata, som du vil opdele i to kolonner efter hver anden række.
2. Klik derefter på Kutools > Range > Transformér rækkevidde, se skærmbillede:
3. I Transformér rækkevidde dialogboksen, vælg En kolonne til rækkevidde under Transformeringstype, Og vælg derefter Fast værdi og indtast 2 ind i feltet i Rækker pr. Rekord sektion, se skærmbillede:
4. Klik derefter på Ok knappen, og en promptboks vil poppe ud for at minde dig om at vælge en celle, hvor du vil udskrive resultatet, se skærmbillede:
5. Klik OK, listedata er blevet opdelt i to kolonner hver anden række.
Klik for at vide mere om dette Transform Range-værktøj.
Gratis download Kutools til Excel nu
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!