Bỏ qua nội dung chính

Làm thế nào để lật / đảo ngược thứ tự dữ liệu hàng trong Excel một cách nhanh chóng?

Khi bạn cần đảo ngược hoặc lật thứ tự dữ liệu của một hàng, làm thế nào bạn có thể nhanh chóng hoàn thành việc đó? Thông thường, bạn có thể phải sử dụng mã VBA hoặc các phần bổ trợ Excel khác để làm như vậy, vì Excel không hỗ trợ hoạt động như vậy. Và đây là những điều phức tạp sau đây sẽ giúp bạn nhanh chóng lật hoặc đảo ngược thứ tự dữ liệu hàng trong Excel.

Lật / đảo ngược thứ tự dữ liệu theo chiều ngang trong các hàng với VBA

Lật / đảo ngược thứ tự dữ liệu theo chiều ngang trong các hàng với Kutools cho Excel



mũi tên màu xanh bong bóng bên phải Lật / đảo ngược thứ tự dữ liệu theo chiều ngang trong các hàng với VBA

Đây là một macro VBA gọn gàng có thể giúp bạn nhanh chóng lật / đảo ngược thứ tự dữ liệu theo hàng ngang.

Bước 1: Nhấn giữ Khác + F11 các phím trong Excel và nó sẽ mở Microsoft Visual Basic cho các ứng dụng cửa sổ.

Bước 2: Nhấp chuột Chèn > Mô-đunvà dán macro sau vào Mô-đuncửa sổ.

Sub FlipRows()
'Updateby20131126
Dim Rng As Range
Dim WorkRng As Range
Dim Arr As Variant
Dim i As Integer, j As Integer, k As Integer
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
Arr = WorkRng.Formula
For i = 1 To UBound(Arr, 1)
    k = UBound(Arr, 2)
    For j = 1 To UBound(Arr, 2) / 2
        xTemp = Arr(i, j)
        Arr(i, j) = Arr(i, k)
        Arr(i, k) = xTemp
        k = k - 1
    Next
Next
WorkRng.Formula = Arr
End Sub

Bước 3: Nhấn phím F5 để chạy macro này và một hộp thoại được hiển thị để bạn chọn một phạm vi để làm việc, xem ảnh chụp màn hình:

doc-đảo ngược thứ tự8

Bước 4: Ấn Bản OK, bạn có thể xem kết quả như hình dưới đây:


mũi tên màu xanh bong bóng bên phải Lật / đảo ngược thứ tự dữ liệu theo chiều ngang trong các hàng với Kutools cho Excel

Với Kutools cho Excel'S Phạm vi lật ngang công cụ, bạn có thể lật / đảo ngược thứ tự dữ liệu theo chiều ngang trong các hàng đã chọn một cách nhanh chóng.

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.

Bước 1: Chọn hàng mà bạn sẽ lật dữ liệu.

Bước 2: Nhấn vào Kutools > Công cụ chuyển đổi phạm vi > Phạm vi lật ngang, xem ảnh chụp màn hình:

doc-đảo ngược hàng-order3

Sau đó, bạn sẽ thấy tất cả thứ tự dữ liệu được đảo ngược trong các hàng đã chọn.

doc-đảo ngược hàng-order4
-1
doc-đảo ngược hàng-order5

Nhấp chuột Phạm vi lật ngang để biết thêm về tính năng này.


Bài viết liên quan:

Làm thế nào để lật / đảo ngược một cột theo thứ tự dữ liệu theo chiều dọc trong Excel?

Công cụ năng suất văn phòng tốt nhất

🤖 Trợ lý AI của Kutools: Cách mạng hóa việc phân tích dữ liệu dựa trên: Thực thi thông minh   |  Tạo mã  |  Tạo công thức tùy chỉnh  |  Phân tích dữ liệu và tạo biểu đồ  |  Gọi các hàm Kutools...
Các tính năng phổ biến: Tìm, đánh dấu hoặc xác định các bản sao   |  Xóa hàng trống   |  Kết hợp các cột hoặc ô mà không làm mất dữ liệu   |   Vòng không có công thức hữu ích. Cảm ơn !
Siêu tra cứu: Nhiều tiêu chí VLookup    VLookup Nhiều Giá Trị  |   VLookup trên nhiều trang tính   |   Tra cứu mờ ....
Danh sách thả xuống nâng cao: Tạo nhanh danh sách thả xuống   |  Danh sách thả xuống phụ thuộc   |  Danh sách thả xuống nhiều lựa chọn ....
Trình quản lý cột: Thêm một số cột cụ thể  |  Di chuyển cột  |  Chuyển đổi trạng thái hiển thị của các cột ẩn  |  So sánh dãy và cột hữu ích. Cảm ơn !
Các tính năng nổi bật: Tiêu điểm lưới   |  Chế độ xem thiết kế   |   Thanh công thức lớn    Trình quản lý sổ làm việc & trang tính   |  Thư viện tài nguyên (Văn bản tự động)   |  Bảng chọn ngày   |  Kết hợp các bảng tính   |  Mã hóa/Giải mã ô    Gửi email theo danh sách   |  Siêu lọc   |   Bộ lọc đặc biệt (lọc in đậm/nghiêng/gạch ngang...) ...
15 bộ công cụ hàng đầu12 bản văn CÔNG CỤ (thêm văn bản, Xóa ký tự,...)   |   50 + Biểu đồ Các loại (Biểu đồ Gantt,...)   |   40+ Thực tế Công thức (Tính tuổi dựa trên ngày sinh,...)   |   19 chèn CÔNG CỤ (Chèn mã QR, Chèn ảnh từ đường dẫn,...)   |   12 Chuyển đổi CÔNG CỤ (Số thành từ, Chuyển đổi tiền tệ,...)   |   7 Hợp nhất & Tách CÔNG CỤ (Các hàng kết hợp nâng cao, Chia ô,...)   |   ... và nhiều hơn nữa

Nâng cao kỹ năng Excel của bạn với Kutools for Excel và 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...

Mô tả


Tab Office mang lại giao diện Tab cho Office và giúp công việc của bạn trở nê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!
Comments (7)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
In response to Rodrigo, Fbkil:

The error occurs because when you cut and paste the macro text into the Excel VBA editor, there are non-printing characters hidden in the area where the macro rows are indented. Delete them and it will work.

Note: Solved by someone else, not me. Was tricky, as it looked like it should work, but didn't.
This comment was minimized by the moderator on the site
When I try to run this macro, I get the message "syntax error" with the command line "For j = 1 To UBound(Arr, 2) / 2" highlighted in red. Does anyone know how to fix it?
This comment was minimized by the moderator on the site
got the same error. update needed
This comment was minimized by the moderator on the site
Great tool, thanks so much for VBA - I transposed a column to rows first and then used your VBA for reversing - saved tons of time!
This comment was minimized by the moderator on the site
You flipped the column order not the row order as per the title.
This comment was minimized by the moderator on the site
Copy paste (transpose) the row to column. Add 1 to x on the column beside. Filter from largest to smallest and expand. Then copy paste result and transpose to row again
This comment was minimized by the moderator on the site
A quicker way would be be to copy your selection. Right click, choose paste special. Check the transpose button, hit ok and the rows and columns will be transposed. http://office.microsoft.com/en-us/excel-help/switch-transpose-columns-and-rows-HP010224502.aspx
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations