Bỏ qua nội dung chính

Làm cách nào để hoán đổi nhanh nội dung của hai ô trong Excel?

Tác giả: Tiểu Dương Sửa đổi lần cuối: 2020-04-30

Khi chúng tôi đang xử lý một trang tính, đôi khi chúng tôi có thể cần hoán đổi nội dung của hai ô. Thông thường, hầu hết chúng ta chỉ biết “cắt, dán và sao chép” để trao đổi nội dung, nhưng việc này rất tốn thời gian. Chúng ta sẽ nói về cách nhanh chóng hoán đổi nội dung trong các ô trong Excel.

Trao đổi thủ công hai nội dung ô liền kề
Hoán đổi hai nội dung ô không liền kề bằng mã VBA
Dễ dàng hoán đổi hai nội dung ô ngẫu nhiên chỉ với vài cú nhấp chuột


Trao đổi thủ công hai nội dung ô liền kề

Đôi khi, có hai ô liền kề cần được hoán đổi. Chúng ta có thể làm thủ công một cách dễ dàng. Nhìn vào ảnh chụp màn hình sau, tôi muốn hoán đổi ô A4 và B4, vui lòng làm như sau:

doc-hoán đổi-ô1

1. Chọn ô bạn muốn hoán đổi. Trong ví dụ này, hãy chọn ô A4.

2. nhấn sự thay đổi và đặt con trỏ ở đường viền bên phải.

3. Sau đó kéo con trỏ đến đường viền bên phải của ô B4.

4. Khi có hiển thị “”, Thả chuột.

5. Và hai nội dung ô đã được hoán đổi. Xem ảnh chụp màn hình:

doc-hoán đổi-ô2

Với phương pháp này, chúng ta cũng có thể hoán đổi hai hàng hoặc cột liền kề.

Nhanh chóng hoán đổi nội dung của hai ô hoặc phạm vi trong Excel:

Kutools cho Excel's Hoán đổi phạm vi tiện ích giúp bạn dễ dàng hoán đổi hai ô hoặc phạm vi được chỉ định cùng một lúc trong Excel như hình minh họa bên dưới.
Tải xuống và dùng thử ngay bây giờ! (đường mòn miễn phí 30 ngày)

hoán đổi ô1


Hoán đổi hai nội dung ô không liền kề bằng mã VBA

Khi hai ô không liền nhau, phương pháp trên sẽ không hoạt động. Chúng ta có thể hoán đổi chúng bằng mã VBA.

1. Nhấn nút Ctrl và chọn hai ô không liền kề mà bạn muốn hoán đổi.

2. Nhấp chuột Nhà phát triển>Visual Basic, Một mới Microsoft Visual Basic cho các ứng dụng cửa sổ sẽ được hiển thị, nhấp vào Chèn>Mô-đunvà nhập mã sau vào Mô-đun:

Sub SwapTwoRange()
'Updateby20131120
Dim Rng1 As Range, Rng2 As Range
Dim arr1 As Variant, arr2 As Variant
xTitleId = "KutoolsforExcel"
Set Rng1 = Application.Selection
Set Rng1 = Application.InputBox("Range1:", xTitleId, Rng1.Address, Type:=8)
Set Rng2 = Application.InputBox("Range2:", xTitleId, Type:=8)
Application.ScreenUpdating = False
arr1 = Rng1.Value
arr2 = Rng2.Value
Rng1.Value = arr2
Rng2.Value = arr1
Application.ScreenUpdating = True
End Sub

3. Sau đó nhấn vào doc-nhân-tính-3 để chạy mã, sau đó một hộp thoại sẽ hiển thị để bạn chọn hai ô bạn muốn hoán đổi giữa các ô. Xem ảnh chụp màn hình:

phạm vi hoán đổi doc1

4. nhấp chuột Ok trong hộp thoại bật lên, hai ô đã chọn được đổi chỗ cho nhau. Xem ảnh chụp màn hình:

phạm vi hoán đổi doc1

Ghi chú: Mã VBA này không thể hoán đổi định dạng của hai ô.


Dễ dàng hoán đổi hai nội dung ô ngẫu nhiên chỉ với vài cú nhấp chuột

Với Kutools cho Excel's Hoán đổi phạm vi tiện ích, chúng ta không chỉ có thể hoán đổi hai ô, hàng hoặc cột liền kề mà còn có thể chuyển đổi hai ô, hàng hoặc cột không liền kề một cách dễ dàng.

Trước khi áp dụng Kutools cho Excel, Xin vui lòng tải xuống và cài đặt nó trước tiên.

1. nhấp chuột Kutools > Phạm vi > Hoán đổi phạm vi, xem ảnh chụp màn hình:

2. bên trong Hoán đổi phạm vi hộp thoại, bạn cần:

  • (1) nhấp vào đầu tiên doc-Replace-range-names-7 nút trong Khoảng hoán đổi 1 để chọn các ô mà bạn muốn hoán đổi.
  • (2) nhấp vào thứ hai doc-Replace-range-names-7 nút từ Khoảng hoán đổi 2 để chọn các ô mà bạn sẽ hoán đổi.
    Lời khuyên: Bạn có thể chọn hai phạm vi trước khi áp dụng tính năng, sau đó bạn có thể thấy hai phạm vi đã chọn được hiển thị trong các hộp Phạm vi hoán đổi 1 và Phạm vi hoán đổi 2 riêng biệt.
  • (3) Nhấp vào OK .

Sau đó, hai ô hoặc phạm vi đã chọn sẽ được hoán đổi ngay lập tức. Xem ảnh chụp màn hình:

phạm vi hoán đổi doc1

  Nếu bạn muốn dùng thử miễn phí (30 ngày) tiện ích này, vui lòng nhấp để tải xuống, và sau đó đi đến áp dụng hoạt động theo các bước trên.


Demo: Hoán đổi hai nội dung ô ngẫu nhiên với Kutools cho Excel


Bài viết liên quan:

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 (12)
Rated 2.5 out of 5 · 1 ratings
This comment was minimized by the moderator on the site
The vba is pants because it loses formulas and formatting. It's incredible that Excel has been through like about 25 different versions and STILL doesn't have the facility in it natively to swap two ranges/non-adjacent cells around. Sort it out Microsoft!
Rated 2.5 out of 5
This comment was minimized by the moderator on the site
Legyenszíves Megírni melyik az a müszak gomb.
Köszönöm Üdv Ádám
This comment was minimized by the moderator on the site
this isn't working for me. I don't know why
This comment was minimized by the moderator on the site
Koje njesra... na kraju cu ipak raditi copy paste... Umesto da su ubacili swap opciju na padajucem menju....
This comment was minimized by the moderator on the site
Cool trick that saved me a lot of time. Thank you!
This comment was minimized by the moderator on the site
First option work well for me thanks for your efforts... :-)
This comment was minimized by the moderator on the site
Thanks !! works perfectly for me..
This comment was minimized by the moderator on the site
Thanks !! works perfectly for me..
This comment was minimized by the moderator on the site
Thank you for the information!!!
This comment was minimized by the moderator on the site
You could just cut (non-adjacent) Cell A into an unoccupied cell, paste required cell B into that space then put A into the cell B formerly occupied couldn't you?
This comment was minimized by the moderator on the site
It's not as simple as you suggested when cells have formula in them. And this also helps in inserting multiple cells at any desired location as well.
This comment was minimized by the moderator on the site
Yes you could, but why go such a roundabout way when you can do it much faster this way. Thanks ExtendOffice for your good work.
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations