Hoe transponeert u elke 5 of n rijen uit één kolom naar meerdere kolommen?
Het transponeren van elke 5 (of n) rijen uit één kolom naar meerdere kolommen in Excel is uiterst handig bij het herstructureren van gegevens voor analyse of rapportage. Stel dat u een lange lijst gegevens heeft in kolom A en u wilt elke 5 opeenvolgende rijen transponeren naar afzonderlijke rijen met meerdere kolommen — bijvoorbeeld A1:A5 naar C6:G6, A6:A10 naar C7:G7, enzovoort, zoals te zien is in de linker screenshot. Er zijn verschillende methodes om dit te bereiken, elk met eigen voordelen. Hieronder vindt u een gedetailleerde, stapsgewijze handleiding om dit eenvoudig en efficiënt uit te voeren.
Transponeer elke 5 of n rijen van één kolom naar meerdere kolommen
Transponeer elke 5 of n rijen van één kolom naar meerdere kolommen met een formule
In Excel kunt u de volgende formule gebruiken om elke n rijen uit één kolom naar meerdere kolommen te transponeren. Volg deze stappen:
1. Voer de volgende formule in een lege cel in om het resultaat daar weer te geven.
=INDEX($A:$A,ROW(A1)*5-5+COLUMN(A1))
2. Sleep vervolgens de vulgreep vijf cellen naar rechts en daarna naar beneden over het celbereik totdat er 0 wordt weergegeven. Zie de screenshot:
Transponeer elke 5 of n rijen van één kolom naar meerdere kolommen met Kutools voor Excel
Zit u vast met het transponeren van Excel-gegevens van één kolom naar meerdere kolommen? De functie „Bereik transformeren” van Kutools voor Excel lost dat probleem in een handomdraai op! Of u nu elke 5 rijen wilt omzetten of een aangepast aantal rijen kiest – met onze flexibele rijconversie bepaalt u zelf hoeveel rijen u van één kolom naar meerdere kolommen wilt transponeren. Eenvoudig, snel en zonder ingewikkelde stappen: slechts een paar klikken en klaar!
Na installatie van „Kutools voor Excel” gaat u als volgt te werk:
1. Selecteer de gegevens in de kolom en klik daarna op „Kutools” > „Bereik” > „Bereik transformeren”. Zie de screenshot:
2. Selecteer in het dialoogvenster „Bereik transformeren” de optie „Enkele kolom naar bereik” onder „Transformeertype”, vink vervolgens „Vaste waarde” aan onder „Rijen per record” en geef het gewenste aantal kolommen op in het vak „Vaste waarde”. Zie de screenshot:
3. Klik vervolgens op de knop „OK”. In het pop-upvenster selecteert u een cel om het resultaat weer te geven. Zie de screenshot:
4. Klik daarna op de knop „OK” en uw kolomgegevens worden elke 5 rijen getransponeerd, zoals op de volgende screenshot is weergegeven:
Transponeer elke 5 of n rijen van één kolom naar meerdere kolommen met VBA-code
Als u de formule niet correct kunt toepassen, helpt de volgende VBA-code u verder.
1. Druk op „ALT” + „F11” om het venster „Microsoft Visual Basic for Applications” te openen.
2. Klik op 'Invoegen' > 'Module' en plak de volgende code in het modulevenster.
VBA-code: Transponeer elke 5 of n rijen van één kolom naar meerdere kolommen:
Public Sub TransposeData()
'updateby Extendoffice
Dim xLRow As Long
Dim xNRow As Long
Dim i As Long
Dim xUpdate As Boolean
Dim xRg As Range
Dim xOutRg As Range
Dim xTxt As String
On Error Resume Next
xTxt = ActiveWindow.RangeSelection.Address
Set xRg = Application.InputBox("Please select data range(only one column):", "Kutools for Excel", xTxt, , , , , 8)
Set xRg = Application.Intersect(xRg, xRg.Worksheet.UsedRange)
If xRg Is Nothing Then Exit Sub
If (xRg.Columns.Count > 1) Or _
(xRg.Areas.Count > 1) Then
MsgBox "the used range only contain one column", , "Kutools for Excel"
Exit Sub
End If
Set xOutRg = Application.InputBox("please select output range(specify one cell):", "Kutools for Excel", xTxt, , , , , 8)
If xOutRg Is Nothing Then Exit Sub
Set xOutRg = xOutRg.Range(1)
xUpdate = Application.ScreenUpdating
Application.ScreenUpdating = False
xLRow = xRg.Rows.Count
For i = 1 To xLRow Step 5
xRg.Cells(i).Resize(5).Copy
xOutRg.Offset(xNRow, 0).PasteSpecial Paste:=xlPasteAll, Transpose:=True
xNRow = xNRow + 1
Next
Application.ScreenUpdating = xUpdate
End Sub
3. Nadat u de code hebt geplakt, drukt u op F5 om deze uit te voeren. Er verschijnt een promptvenster waarin u wordt gevraagd de kolom te selecteren die u wilt transponeren. Zie de screenshot:
4. Klik daarna op „OK” en kies in het volgende venster één cel waarin u het resultaat wilt plaatsen. Zie de screenshot:
5. Klik op „OK” en uw kolomgegevens worden automatisch verdeeld over de vijf kolommen die u nodig hebt. Zie de screenshot:
Om elke 5 of n rijen uit één kolom naar meerdere kolommen te transponeren in Excel, presenteert dit artikel drie effectieve methoden. Elk van deze methoden biedt een andere aanpak om gegevens in Excel te herschikken, afgestemd op verschillende niveaus van ervaring met Excel-hulpmiddelen en programmering. Als u nog meer Excel-tips en -trucs wilt ontdekken,biedt onze website duizenden tutorials.
Beste Office-productiviteitshulpmiddelen
Geef uw Excel-vaardigheden een boost met Kutools voor Excel en ervaar efficiëntie zoals nooit tevoren.Kutools voor Excel biedt meer dan 300 geavanceerde functies om de productiviteit te verhogen en Tijd besparen.Klik hier om de functie te krijgen die u het meest nodig heeft...
Office Tab brengt een tabbladinterface naar Office en maakt uw werk veel eenvoudiger
- Schakel tabbladbewerking en -lezen in voor Word, Excel, PowerPoint, Publisher, Access, Visio en Project.
- Open en maak meerdere documenten aan in nieuwe tabbladen binnen hetzelfde venster, in plaats van in afzonderlijke vensters.
- Verhoogt uw productiviteit met 50 % en bespaart u dagelijks honderden muisklikken!
Alle Kutools-add-ins in één installatieprogramma.
Kutools for Office bundelt add-ins voor Excel, Word, Outlook en PowerPoint, plus Office Tab Pro—ideaal voor teams die met meerdere Office-apps werken.
- Alles-in-één suite— add-ins voor Excel, Word, Outlook & PowerPoint plus Office Tab Pro
- Één installatieprogramma, één licentie— binnen enkele minuten klaar (MSI-geschikt)
- Werkt beter samen— gestroomlijnde productiviteit in alle Office-apps
- 30 dagen volledig functionele proefversie— geen registratie, geen creditcard
- Beste prijs-kwaliteitverhouding— bespaar ten opzichte van het afzonderlijk kopen van add-ins