Làm cách nào để kết hợp nhiều cột thành một danh sách trong Excel?
Để kết hợp hoặc hợp nhất nhiều cột thành một danh sách dài, thông thường, bạn có thể sao chép và dán dữ liệu cột lần lượt vào cột được chỉ định. Tuy nhiên, ở đây, tôi có thể giới thiệu cho bạn một số thủ thuật nhanh chóng để giải quyết công việc này trong Excel.
Kết hợp nhiều cột thành một danh sách với mã VBA
Kết hợp nhiều cột thành một danh sách với Kutools for Excel
Kết hợp nhiều cột thành một danh sách với mã VBA
Không cần lặp lại sao chép và dán dữ liệu cột, mã VBA sau có thể giúp bạn giải quyết công việc này một cách nhanh chóng và dễ dàng.
1. Giữ phím tắt Alt + F11 các phím trong Excel và nó sẽ mở Microsoft Visual Basic cho các ứng dụng cửa sổ.
2. Nhấp chuột Chèn > Mô-đunvà dán macro sau vào Mô-đun Cửa sổ.
Mã VBA: Kết hợp hoặc hợp nhất nhiều cột thành một danh sách
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. Sau đó nhấn F5 để chạy mã này và một hộp nhắc sẽ bật ra để nhắc bạn chọn phạm vi dữ liệu mà bạn muốn kết hợp chỉ thành một cột, xem ảnh chụp màn hình:
4. Và sau đó nhấp vào OK và các cột đã chọn chỉ được hợp nhất thành một cột như ảnh chụp màn hình sau:
 |
 |
 |
Lời khuyên: Sau khi chạy VBA này, dữ liệu gốc của phạm vi sẽ bị xóa, bạn nên sao chép và lưu chúng ở một vị trí khác trước.
Kết hợp nhiều cột thành một danh sách với Kutools for Excel
Nếu bạn đã cài đặt Kutools for ExcelCủa nó, Phạm vi chuyển đổi tiện ích có thể giúp bạn kết hợp nhiều cột thành một cột hoặc một hàng.
| Kutools for Excel : với hơn 300 bổ trợ Excel tiện dụng, dùng thử miễn phí không giới hạn trong 30 ngày. |
Sau khi cài đặt Kutools for Excel, vui lòng làm như sau:
1. Chọn dữ liệu cột mà bạn muốn kết hợp thành một danh sách.
2. Sau đó nhấn vào Kutools > Phạm vi > Phạm vi chuyển đổi, xem ảnh chụp màn hình:
3. Trong Phạm vi chuyển đổi hộp thoại, chọn Phạm vi thành một cột và nhấp vào Ok nút, xem ảnh chụp màn hình:
4. Trong phần sau xuất hiện Phạm vi chuyển đổi , nhấp vào ô mà bạn muốn xuất kết quả, xem ảnh chụp màn hình:
5. Sau đó nhấn vào OK , các cột đã chọn của bạn đã được kết hợp thành một cột duy nhất ở vị trí được chỉ định mà bạn muốn. Xem ảnh chụp màn hình:
Tải xuống và dùng thử miễn phí Kutools for Excel Hiện nay !
Demo: Kết hợp nhiều cột thành một danh sách với Kutools for Excel
Công cụ năng suất văn phòng tốt nhất
Nâng cao kỹ năng Excel của bạn với Kutools for Excelvà trải nghiệm hiệu quả hơn bao giờ hết. Kutools for Excel Cung cấp hơn 300 tính năng nâng cao để tăng năng suất và tiết kiệm thời gian. Bấm vào đây để có được tính năng bạn cần nhất...
Office Tab Mang giao diện theo thẻ vào Office và giúp công việc của bạn dễ dàng hơn nhiều
- Cho phép chỉnh sửa và đọc theo thẻ trong Word, Excel, PowerPoint, Publisher, Access, Visio và Project.
- Mở và tạo nhiều tài liệu trong các tab mới của cùng một cửa sổ, thay vì trong các cửa sổ mới.
- Tăng 50% năng suất của bạn và giảm hàng trăm cú nhấp chuột cho bạn mỗi ngày!
