Як об’єднати кілька стовпців в один список в Excel?
Щоб об’єднати або об’єднати кілька стовпців в один довгий список, зазвичай можна копіювати та вставляти дані стовпців по одному в зазначений стовпець. Але тут я можу представити вам кілька швидких прийомів для вирішення цього завдання в Excel.
Поєднайте кілька стовпців в один список із кодом VBA
Об’єднайте кілька стовпців в один список за допомогою Kutools для Excel
Поєднайте кілька стовпців в один список із кодом VBA
Не повторюючи копіювання та вставки даних стовпців, наступний код VBA може допомогти вам швидко та легко впоратися з цією роботою.
1. Утримуйте клавішу Alt + F11 клавіші в Excel, і він відкриває Microsoft Visual Basic для додатків вікна.
2. Натисніть Insert > Модуліта вставте наступний макрос у Модулі Вікно
Код VBA: об’єднайте або об’єднайте кілька стовпців в один список
Sub CombineColumns1()
'updateby Extendoffice
Dim xRng As Range
Dim i As Integer
Dim xLastRow As Integer
Dim xTxt As String
On Error Resume Next
xTxt = Application.ActiveWindow.RangeSelection.Address
Set xRng = Application.InputBox("please select the data range", "Kutools for Excel", xTxt, , , , , 8)
If xRng Is Nothing Then Exit Sub
xLastRow = xRng.Columns(1).Rows.Count + 1
For i = 2 To xRng.Columns.Count
Range(xRng.Cells(1, i), xRng.Cells(xRng.Columns(i).Rows.Count, i)).Cut
ActiveSheet.Paste Destination:=xRng.Cells(xLastRow, 1)
xLastRow = xLastRow + xRng.Columns(i).Rows.Count
Next
End Sub
3. Потім натисніть F5 клавішу для запуску цього коду, і з'явиться підказка з нагадуванням про вибір діапазону даних, який потрібно об'єднати лише в один стовпець;
4. А потім клацніть OK , а вибрані стовпці були об'єднані лише в один стовпець, як показано на наступних знімках екрана:
Tips : Після запуску цього VBA оригінальні дані діапазону будуть очищені, краще скопіюйте та збережіть їх спочатку в іншому місці.
Об’єднайте кілька стовпців в один список за допомогою Kutools для Excel
Якщо ви встановили Kutools для Excel, його Діапазон трансформації Утиліта може допомогти вам об'єднати кілька стовпців в один стовпець або один рядок.
Kutools для Excel : з більш ніж 300 зручними надбудовами Excel, які можна спробувати без обмежень протягом 30 днів. |
після установки Kutools для Excel, будь ласка, виконайте наступне:
1. Виберіть дані стовпців, які потрібно об’єднати в один список.
2. Потім натисніть Кутулс > Діапазон > Діапазон трансформації, див. скріншот:
3, в Діапазон трансформації діалогове вікно, виберіть Діапазон до однієї колонки і натисніть Ok , див. знімок екрана:
4. У наступному вискакує Діапазон трансформації натисніть клітинку, куди ви хочете вивести результат, див. знімок екрана:
5. Потім натисніть OK кнопку, вибрані вами стовпці були об'єднані в один стовпець у вказаному місці, яке ви бажали. Дивіться знімок екрана:
Завантажте та безкоштовну пробну версію Kutools для Excel зараз!
Демо: об’єднайте кілька стовпців в один список за допомогою Kutools для Excel
Найкращі інструменти продуктивності офісу
Покращуйте свої навички Excel за допомогою Kutools для Excel і відчуйте ефективність, як ніколи раніше. Kutools для Excel пропонує понад 300 додаткових функцій для підвищення продуктивності та економії часу. Натисніть тут, щоб отримати функцію, яка вам найбільше потрібна...
Вкладка Office Передає інтерфейс із вкладками в Office і значно полегшує вашу роботу
- Увімкніть редагування та читання на вкладках у Word, Excel, PowerPoint, Publisher, Access, Visio та Project.
- Відкривайте та створюйте кілька документів на нових вкладках того самого вікна, а не в нових вікнах.
- Збільшує вашу продуктивність на 50% та зменшує сотні клацань миші для вас щодня!