Jak szybko ułożyć wiele kolumn w jednej kolumnie w programie Excel?

w programie Excel funkcja Tekst na kolumny może podzielić komórkę na wiele kolumn na podstawie separatora, ale czy istnieją sposoby na ułożenie wielu kolumn w jedną kolumnę, jak pokazano na zrzucie ekranu? W tym artykule przedstawię kilka trików, jak szybko rozwiązać to zadanie.

Ułóż wiele kolumn w jedną za pomocą formuły

Ułóż wiele kolumn w jedną za pomocą VBA

Stosuj wiele kolumn w jedną za pomocą opcji Zakres transformacji

Ułóż wiele kolumn w jedną za pomocą formuły

1. Wybierz zakres, który chcesz ułożyć, i przejdź do Nazwa Box aby nadać temu zakresowi nazwę, i naciśnij Wchodzę klucz. Zobacz zrzut ekranu:

2. Następnie wybierz pustą komórkę, w której chcesz umieścić wyniki, wprowadź tę formułę =INDEX(MyData,1+INT((ROW(A1)-1)/COLUMNS(MyData)),MOD(ROW(A1)-1+COLUMNS(MyData),COLUMNS(MyData))+1), naciśnij Enter i przeciągnij uchwyt wypełniania w dół, aż pojawi się błąd. Zobacz zrzut ekranu:

Ułóż wiele kolumn w jedną za pomocą VBA

Oto kod VBA, który może Ci również pomóc.

1. naciśnij Alt + F11 klawisze do wyświetlenia Microsoft Visual Basic for Applications okno.

2. kliknij wstawka > Moduł, wklej poniższy kod do pliku Moduł.

VBA: Ustaw kolumny w jeden

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. naciśnij F5 Aby uruchomić kod, pojawi się okno dialogowe, w którym można wybrać dane źródłowe, i kliknij OK, aby wybrać komórkę do umieszczenia wyników. Zobacz zrzut ekranu:

4. kliknij OK. Teraz kolumny zostały ułożone w jednej kolumnie.

Stosuj wiele kolumn w jedną za pomocą opcji Zakres transformacji

Aplikować Kutools dla programu Excel'S Zakres transformacji Narzędzie jest również pomocne w szybkim rozwiązaniu tego problemu.

Po bezpłatna instalacja Kutools dla programu Excel, wykonaj poniższe czynności:

1. Wybierz używane kolumny i kliknij Kutools > łodzie > Zakres transformacji. Zobacz zrzut ekranu:

2. w Zakres transformacji okno dialogowe, sprawdź Zakres do jednej kolumny opcję i kliknij Ok, a następnie wybierz komórkę, w której chcesz umieścić wyniki. Zobacz zrzut ekranu:

3. kliknij OK. Teraz kolumny zostały ułożone w jedną kolumnę.