Làm thế nào để chuyển vị / chuyển đổi các cột và hàng thành một hàng?

Làm thế nào để nối nhiều hàng và cột thành một hàng dài? Có thể, nó có vẻ dễ dàng đối với bạn, bởi vì bạn có thể sao chép từng cái một và nối chúng thành một hàng theo cách thủ công. Nhưng sẽ rất mất thời gian và tẻ nhạt nếu có hàng trăm hàng và cột. Ở đây tôi sẽ nói về một số thủ thuật nhanh chóng để giải quyết nó.

Chuyển đổi / Chuyển đổi cột và hàng thành hàng đơn với công thức

Chuyển đổi / Chuyển đổi các cột và hàng thành một hàng với mã VBA

Chuyển đổi / Chuyển đổi các cột và hàng thành một hàng với Kutools cho Excel

Chuyển đổi / Chuyển đổi cột và hàng thành hàng đơn với công thức

Giả sử bạn có một phạm vi dữ liệu như ảnh chụp màn hình sau đây, bạn có thể chuyển đổi dữ liệu phạm vi thành một hàng trong một trang tính mới với một công thức dài.

Vui lòng áp dụng công thức như sau:

1. Trong một trang tính mới của sổ làm việc đang hoạt động, hãy bấm vào ô A1, sao chép và dán công thức này: =OFFSET(Sheet1!$A$1,((ROW()-1)*5)+(FLOOR(COLUMN()-1,4)/4),(COLUMN()-1)-(FLOOR(COLUMN()-1,4)))

Chú thích: Trang tính 1! $ A $ 1 là tham chiếu trang tính và phạm vi mà bạn muốn sử dụng.

ROW () - 1) * 5 trong công thức trên, 5 là viết tắt của số hàng; và CỘT () - 1,4) / 4, Các 4 là viết tắt của số cột. Bạn có thể thay đổi chúng theo nhu cầu của bạn.

2. Sau đó kéo chốt điền sang phải cho đến khi số 0 xuất hiện. Trong trường hợp này, tất cả dữ liệu trong phạm vi đã được chuyển thành một hàng trong một trang tính mới. Xem ảnh chụp màn hình:

Chuyển đổi / Chuyển đổi các cột và hàng thành một hàng với mã VBA

Mã VBA sau đây cũng có thể giúp bạn chuyển đổi một dải dữ liệu thành một hàng.

1. Nhấn giữ ALT + F11 phím để mở Microsoft Visual Basic cho các ứng dụng cửa sổ.

2. nhấp chuột Chèn > Mô-đunvà dán mã sau vào Mô-đun cửa sổ.

Sub TransformOneRow()
'Updateby20131120
Dim InputRng As Range, OutRng As Range
xTitleId = "KutoolsforExcel"
Set InputRng = Application.Selection
Set InputRng = Application.InputBox("Ranges to be transform :", xTitleId, InputRng.Address, Type:=8)
Set OutRng = Application.InputBox("Paste to (single cell):", xTitleId, Type:=8)
Application.ScreenUpdating = False
xRows = InputRng.Rows.Count
xCols = InputRng.Columns.Count
For i = 1 To xRows
    InputRng.Rows(i).Copy OutRng
    Set OutRng = OutRng.Offset(0, xCols + 0)
Next
Application.ScreenUpdating = True
End Sub

3. Sau đó nhấn F5 phím để chạy mã, một hộp thoại hiện ra để bạn chọn một loạt nội dung bạn muốn chuyển đổi thành một hàng và nhấp vào Ok, một hộp thoại bật lên khác dành cho bạn để chọn một ô duy nhất để đưa ra kết quả. Xem ảnh chụp màn hình:

Sau đó nhấn vào Ok, nội dung trong phạm vi đã chọn được chuyển đổi thành một hàng. Xem ảnh chụp màn hình:

Chú thích: Trong Đặt OutRng = OutRng.Offset (0, xCols + 0), bạn có thể thay đổi 0 đến bất kỳ số nào để đáp ứng nhu cầu của bạn.

Đối với exampel, nếu bạn muốn tách các kết quả theo hàng ban đầu bằng một cột, bạn có thể thay đổi Đặt OutRng = OutRng.Offset (0, xCols + 0) đến Đặt OutRng = OutRng.Offset (0, xCols + 1), kết quả được hiển thị như sau:

Chuyển đổi / Chuyển đổi các cột và hàng thành một hàng với Kutools cho Excel

Có vẻ như hai phương pháp trên hơi khó đối với người mới bắt đầu Excel, ở đây tôi sẽ nói về một công cụ tiện dụng-Kutools cho Excel cho bạn.

Kutools cho Excel bao gồm hơn 300 công cụ Excel tiện dụng. Dùng thử miễn phí không giới hạn trong 30 ngày. Lấy nó ngay

Với các tiện ích Phạm vi chuyển đổi of Kutools cho Excel, bạn có thể nhanh chóng chuyển đổi một phạm vi thành một hàng, vui lòng thực hiện như sau:

1. Chọn phạm vi mà bạn muốn chuyển đổi.

2. nhấp chuột Kutools > Phạm vi > Phạm vi chuyển đổi.

3. bên trong Phạm vi chuyển đổi hộp thoại, chọn Phạm vi thành hàng đơn tùy chọn, xem ảnh chụp màn hình:

4. Sau đó nhấn vào OKvà nhấp vào một ô để đưa kết quả từ hộp bật ra.

5. nhấp chuột OKvà dữ liệu trong phạm vi đã được chuyển thành một hàng. Xem ảnh chụp màn hình:

Nếu bạn muốn biết thêm về tính năng này, vui lòng truy cập Phạm vi chuyển đổi.

Các bài liên quan:

Làm thế nào để thay đổi hàng thành cột trong Excel?

Làm cách nào để chuyển / chuyển đổi một cột đơn thành nhiều cột trong Excel?

Làm thế nào để chuyển / chuyển đổi các cột và hàng thành một cột?