Hoe converteer je één cel naar meerdere cellen/rijen in Excel?

Soms is het lastig om alle gegevens te bekijken als er veel gegevens in een cel in Excel staan. In dit geval kan het converteren van alle gegevens in deze cel naar meerdere cellen of rijen het veel gemakkelijker en duidelijker maken om lange inhoud te bekijken, zoals hieronder wordt weergegeven. In Excel kun je dit op de volgende manieren doen.

Converteer één cel naar meerdere cellen/rijen met Tekst naar Kolommen en Plakken Speciaal in Excel

Converteer één cel naar meerdere kolommen/rijen met Kutools voor Excel 

Converteer één cel naar meerdere cellen/rijen met VBA

Converteer één cel naar meerdere cellen/rijen met Tekst naar Kolommen en Plakken Speciaal in Excel

1. Selecteer de cel die u wilt converteren en klik Gegevens > Tekst naar Kolommen, zie screenshot:

2. Schakel in het pop-upvenster de optie Gescheiden in en klik op Volgende. Zie screenshot:

3. Schakel alleen de optie Komma in het dialoogvenster in en klik op Voltooien. Zie screenshot:

4. Vervolgens kunt u zien dat de celgegevens zijn gesplitst in meerdere kolommen. Selecteer nu deze cellen, klik met de rechtermuisknop en kies Kopiëren uit het contextmenu om ze te kopiëren. Zie screenshot:

5. Selecteer een lege cel waar u wilt en klik met de rechtermuisknop om te selecteren Transponeren(T), dan kunt u zien dat de gegevens zijn geconverteerd naar meerdere rijen. Zie screenshot:

Als u Microsoft Excel 2007 gebruikt, klikt u op Start > Plakken > Transponeren om de gesplitste gegevens te plakken.

U kunt het resultaat zien zoals weergegeven:

Converteer één cel naar meerdere kolommen/rijen met Kutools voor Excel

Als u Kutools voor Excel heeft geïnstalleerd -- een handig hulpmiddel, kunt u de functie Cellen splitsen gebruiken om snel een enkele cel te splitsen in meerdere kolommen of rijen op basis van een scheidingsteken.

Nadat u Kutools voor Excel hebt geïnstalleerd, doet u het volgende:

1. Selecteer de cel die u wilt splitsen in rijen en klik op Kutools > Samenvoegen & Splitsen > Cellen splitsen. Zie screenshot:

2. Selecteer vervolgens in het Cellen splitsen dialoogvenster de optie Splitsen naar Rijen onder het gedeelte Type, en schakel de optie Ander in onder het gedeelte Scheidingsteken opgeven, voer vervolgens het scheidingsteken in waarop u de cel wilt splitsen in het tekstvak. Zie screenshot:

3. Klik op Ok, en er verschijnt een dialoogvenster om u eraan te herinneren een cel te selecteren om het splitresultaat uit te voeren.

4. Klik op OK. Nu kunt u zien dat een cel is geconverteerd naar meerdere rijen.

Tip: Als u een enkele cel wilt converteren naar kolommen op basis van een specifiek scheidingsteken, schakelt u de optie Splitsen naar Kolommen in het dialoogvenster in en voert u het scheidingsteken in het tekstvak Ander in.

Converteer één cel naar meerdere cellen/rijen met VBA

Als u denkt dat de bovenstaande methode een beetje omslachtig is, kunt u een VBA gebruiken om het te doen.

1. Houd de knop ALT ingedrukt en druk op F11 op het toetsenbord om een Microsoft Visual Basic for Applications-venster te openen.

2. Klik op Invoegen > Module en kopieer de VBA in de module.

VBA: Converteer één cel naar meerdere rijen

Sub TransposeRange()
'Updateby20140312
Dim rng As Range
Dim InputRng As Range, OutRng As Range
xTitleId = "KutoolsforExcel"
Set InputRng = Application.Selection.Range("A1")
Set InputRng = Application.InputBox("Range(single cell) :", xTitleId, InputRng.Address, Type:=8)
Set OutRng = Application.InputBox("Out put to (single cell):", xTitleId, Type:=8)
Arr = VBA.Split(InputRng.Range("A1").Value, ",")
OutRng.Resize(UBound(Arr) - LBound(Arr) + 1).Value = Application.Transpose(Arr)
End Sub

3. Klik op Uitvoeren om de VBA-code uit te voeren, en een KutoolsforExcel dialoogvenster verschijnt waarin u een enkele cel kunt selecteren waarvan u de gegevens wilt converteren. Zie screenshot:

4. Klik op OK, en in een ander pop-upvenster selecteert u een cel om het resultaat uit te voeren. Zie screenshot:

U kunt het resultaat zien:

Tip: In de bovenstaande VBA-code kunt u het scheidingsteken "," wijzigen waarmee u de gegevens wilt scheiden. Deze VBA ondersteunt geen splitsen van cellen op basis van het nieuwe regelteken.

Gerelateerde artikelen:

• Transponeer Bereik-hulpprogramma: Converteer eenvoudig meerdere rijen naar kolommen en rijen in Excel
• Eenhedenconverter-hulpprogramma: Converteer snel decimale getallen naar binair/octaal/hex-getallen en vice versa