Hur delar jag upp en kolumn varannan rad i Excel?
Till exempel har jag en lång lista med data, och nu vill jag dela kolumnen i två listor lika med varannan rad enligt följande skärmdump. Finns det några bra sätt att hantera denna uppgift i Excel?
Dela en kolumn varannan rad med formler
Dela en kolumn varannan rad med formler
Följande formler kan hjälpa dig att snabbt dela upp en kolumn i två kolumner med varannan rad, gör så här:
1. Ange denna formel i en tom cell, C2, till exempel, =INDEX($A$2:$A$13,ROWS(C$1:C1)*2-1), se skärmdump ：
2. Dra sedan påfyllningshandtaget ner tills felen visas i cellerna, se skärmdump:
3. Ange sedan en annan formel i cell D2, =INDEX($A$2:$A$13,ROWS(D$1:D1)*2)och dra påfyllningshandtaget ner till cellerna tills felvärden visas och kolumnvärdena har delats upp i två kolumner varannan rad, se skärmdump:
Dela en kolumn varannan rad med VBA-kod
Om du är intresserad av VBA-kod här kan jag prata om en kod för dig för att lösa detta problem.
1. Håll ner ALT + F11 nycklar i Excel, och det öppnar Microsoft Visual Basic för applikationer fönster.
2. Klicka Insert > Modulernaoch klistra in följande kod i Modulerna Fönster.
VBA-kod: Dela upp en kolumn i två kolumner varannan rad
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. Tryck sedan på F5 -knappen för att köra den här koden, och en snabbruta dyker upp för att påminna dig om att välja det dataområde som du vill dela, se skärmdump:
4. och klicka OK, en annan snabbruta är poppad för att låta dig välja en cell för att sätta resultatet, se skärmdump:
5. Klicka sedan OKoch kolumnen har delats upp i två kolumner av varannan rad. Se skärmdump:
Dela en kolumn varannan rad med Kutools för Excel
Om du vill lära dig mer nya saker kan jag rekommendera ett kraftfullt verktyg -Kutools för Excel, med dess Transformera intervall verktyget kan du snabbt konvertera en rad eller kolumn till ett cellområde och tvärtom.
| Kutools för Excel : med mer än 300 praktiska Excel-tillägg, gratis att prova utan begränsning på 30 dagar. |
När du har installerat Kutools för Excel, gör så här :( Gratis nedladdning Kutools för Excel nu )
1. Välj kolumndata som du vill dela upp i två kolumner med varannan rad.
2. Klicka sedan Kutools > Mätområde > Transformera intervall, se skärmdump:
3. I Transformera intervall dialogrutan väljer du Enstaka kolumn för intervall under Transformera typOch välj sedan Fast värde och skriv in 2 in i rutan i Rader per post avsnitt, se skärmdump:
4. Klicka sedan Ok knappen, och en snabbruta dyker upp för att påminna dig om att du väljer en cell där du vill mata ut resultatet, se skärmdump:
5. Klicka OKhar listdata delats upp i två kolumner varannan rad.
Klicka för att veta mer om detta Transform Range-verktyg.
Gratis nedladdning Kutools för Excel nu
Bästa kontorsproduktivitetsverktyg
Uppgradera dina Excel-färdigheter med Kutools för Excel och upplev effektivitet som aldrig förr. Kutools för Excel erbjuder över 300 avancerade funktioner för att öka produktiviteten och spara tid. Klicka här för att få den funktion du behöver mest...
Fliken Office ger ett flikgränssnitt till Office och gör ditt arbete mycket enklare
- Aktivera flikredigering och läsning i Word, Excel, PowerPoint, Publisher, Access, Visio och Project.
- Öppna och skapa flera dokument i nya flikar i samma fönster, snarare än i nya fönster.
- Ökar din produktivitet med 50 % och minskar hundratals musklick för dig varje dag!
