Hoe een kolom om de andere rij in Excel te splitsen?
Ik heb bijvoorbeeld een lange lijst met gegevens en nu wil ik de kolom opsplitsen in twee lijsten, gelijkmatig om de rij, zoals in het volgende screenshot. Zijn er goede manieren om met deze taak in Excel om te gaan?
Splits een kolom om de andere rij met formules
Splits een kolom om de andere rij met formules
De volgende formules kunnen u helpen om een kolom snel op te splitsen in twee kolommen om de rij, doe dit als volgt:
1. Voer deze formule in een lege cel in, C2, bijvoorbeeld =INDEX($A$2:$A$13,ROWS(C$1:C1)*2-1), zie screenshot:
2. Sleep vervolgens de vulgreep naar beneden totdat de fouten in de cellen worden weergegeven, zie screenshot:
3. Voer vervolgens een andere formule in cel D2 in, =INDEX($A$2:$A$13,ROWS(D$1:D1)*2)en sleep de vulgreep naar de cellen totdat foutwaarden verschijnen en de kolomwaarden om de rij in twee kolommen zijn opgesplitst, zie screenshot:
Splits een kolom om de andere rij met VBA-code
Als je geïnteresseerd bent in VBA-code, kan ik hier een code voor je bespreken om dit probleem op te lossen.
1. Houd de ALT + F11 toetsen in Excel, en het opent het Microsoft Visual Basic voor toepassingen venster.
2. Klikken Invoegen > Moduleen plak de volgende code in het Module Venster.
VBA-code: splits een kolom om de rij in twee kolommen
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. Druk vervolgens op F5 toets om deze code uit te voeren, en er verschijnt een promptvenster om u eraan te herinneren het gegevensbereik te selecteren dat u wilt splitsen, zie screenshot:
4. En klik op OK, wordt er een ander promptvenster weergegeven om u een cel te laten selecteren om het resultaat te plaatsen, zie screenshot:
5. Dan klikken OK, en de kolom is om de rij in twee kolommen gesplitst. Zie screenshot:
Splits een kolom om de andere rij met Kutools voor Excel
Als je meer nieuwe dingen wilt leren, kan ik een krachtig hulpmiddel aanbevelen -Kutools for Excel, Met Transformeer bereik hulpprogramma kunt u snel een enkele rij of kolom converteren naar een celbereik en vice versa.
| Kutools for Excel : met meer dan 300 handige Excel-invoegtoepassingen, gratis te proberen zonder beperking in 30 dagen. |
Na het installeren van Kutools for Excel, doe dan als volgt :( Download nu Kutools voor Excel )
1. Selecteer de kolomgegevens die u om de rij in twee kolommen wilt splitsen.
2. Dan klikken Kutools > RANGE > Transformeer bereik, zie screenshot:
3. In de Transformeer bereik dialoogvenster, selecteer Enkele kolom om te bereiken onder de Type transformeren, kies dan Vaste waarde en ga naar binnen 2 in de doos in de Rijen per record sectie, zie screenshot:
4. Dan klikken Ok knop, en er verschijnt een promptvenster om u eraan te herinneren een cel te selecteren waar u het resultaat wilt uitvoeren, zie screenshot:
5. Klikken OK, zijn de lijstgegevens om de rij in twee kolommen opgesplitst.
Klik om meer te weten over dit hulpprogramma Transform Range.
Download nu Kutools voor Excel
Beste Office-productiviteitstools
Geef uw Excel-vaardigheden een boost met Kutools voor Excel en ervaar efficiëntie als nooit tevoren. Kutools voor Excel biedt meer dan 300 geavanceerde functies om de productiviteit te verhogen en tijd te besparen. Klik hier om de functie te krijgen die u het meest nodig heeft...
Office-tabblad Brengt een interface met tabbladen naar Office en maakt uw werk veel gemakkelijker
- Schakel bewerken en lezen met tabbladen in Word, Excel, PowerPoint in, Publisher, Access, Visio en Project.
- Open en maak meerdere documenten in nieuwe tabbladen van hetzelfde venster in plaats van in nieuwe vensters.
- Verhoogt uw productiviteit met 50% en vermindert honderden muisklikken voor u elke dag!
