Hoe snel meerdere kolommen in één kolom in Excel stapelen?
in Excel kan de functie Tekst naar kolommen een cel opsplitsen in meerdere kolommen op basis van een scheidingsteken, maar als er manieren zijn om meerdere kolommen in één kolom te stapelen, zoals onderstaand screenshot? In dit artikel zal ik enkele trucs introduceren om deze taak snel op te lossen.
Stapel meerdere kolommen in één met formule
Stapel meerdere kolommen in één met VBA
Stapel meerdere kolommen in één met Transform Range
Stapel meerdere kolommen in één met formule
1. Selecteer het bereik dat u wilt stapelen en ga naar het Naam Box om dit bereik een naam te geven, en druk op Enter sleutel. Zie screenshot:
2. Selecteer vervolgens een lege cel waarin u de resultaten wilt plaatsen, voer deze formule in =INDEX(MyData,1+INT((ROW(A1)-1)/COLUMNS(MyData)),MOD(ROW(A1)-1+COLUMNS(MyData),COLUMNS(MyData))+1), druk op enter-toets en sleep de vulgreep naar beneden totdat een fout wordt weergegeven. Zie screenshot:
Stapel meerdere kolommen in één met VBA
Hier is een VBA-code die u ook kan helpen.
1. druk op Alt + F11 toetsen om weer te geven Microsoft Visual Basic voor toepassingen venster.
2. klikken Invoegen > Module, plak onderstaande code in het Module.
VBA: stapel kolommen op één
Sub ConvertRangeToColumn()
'UpdatebyExtendoffice
Dim Range1 As Range, Range2 As Range, Rng As Range
Dim rowIndex As Integer
xTitleId = "KutoolsforExcel"
Set Range1 = Application.Selection
Set Range1 = Application.InputBox("Source Ranges:", xTitleId, Range1.Address, Type:=8)
Set Range2 = Application.InputBox("Convert to (single cell):", xTitleId, Type:=8)
rowIndex = 0
Application.ScreenUpdating = False
For Each Rng In Range1.Rows
Rng.Copy
Range2.Offset(rowIndex, 0).PasteSpecial Paste:=xlPasteAll, Transpose:=True
rowIndex = rowIndex + Rng.Columns.Count
Next
Application.CutCopyMode = False
Application.ScreenUpdating = True
End Sub
3. druk op F5 toets om de code uit te voeren, een dialoogvenster verschijnt om de brongegevens te selecteren en klik op OK, om een cel te selecteren om de resultaten te plaatsen. Zie screenshot:
4. klikken OK. Nu zijn de kolommen in één kolom gestapeld.
Stapel meerdere kolommen in één met Transform Range
Toepassen Kutools for Excel's Transformeer bereik hulpprogramma kan u ook helpen dit probleem snel op te lossen.
Kutools for Excel, met meer dan 300 handige functies, maakt uw werk eenvoudiger. | ||
Na gratis installeren Kutools voor Excel, doe het als volgt:
1. Selecteer de kolomgegevens die u gebruikt en klik op Kutools > RANGE > Transformeer bereik. Zie screenshot:
2. In de Transformeer bereik dialoogvenster, vink aan Bereik tot enkele kolom optie en klik op Oken selecteer vervolgens een cel om resultaten te plaatsen. Zie screenshot:
3. klikken OK. Nu zijn de kolommen in één enkele kolom gestapeld.
Stapel meerdere cellen in één kolom
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!