Làm cách nào để xóa tất cả trừ các phạm vi đã chọn trong Excel?
Trong Excel, chúng ta có thể xóa nhanh chóng và trực tiếp các phạm vi đã chọn, nhưng bạn đã bao giờ thử xóa nội dung ô khác ngoại trừ các phạm vi đã chọn chưa? Bài viết này, tôi sẽ giới thiệu một số thủ thuật để bạn giải quyết công việc này trong Excel một cách nhanh chóng và dễ dàng.
Xóa tất cả trừ các phạm vi đã chọn bằng mã VBA
Xóa tất cả trừ các phạm vi đã chọn với Trình trợ giúp Phạm vi Chọn của Kutools cho Excel
Xóa tất cả trừ các phạm vi đã chọn với Sao chép Phạm vi Kutools cho Excel
Xóa tất cả trừ các phạm vi đã chọn bằng mã VBA
Không có cách nào trực tiếp để bạn xóa tất cả các giá trị ô chưa được chọn cùng một lúc, nhưng, mã VBA sau có thể giúp bạn, vui lòng thực hiện như sau:
1. Vui lòng giữ Ctrl để chọn các ô bạn muốn giữ lại.
2. nhấn Alt + F11 các phím đồng thời để mở Microsoft Visual Basic cho ứng dụng cửa sổ.
3. Trong Microsoft Visual Basic cho ứng dụng hộp thoại cửa sổ, nhấp vào Chèn > Mô-đun, sau đó sao chép và dán mã VBA bên dưới vào Mô-đun cửa sổ.
Mã VBA: xóa tất cả các giá trị ô trừ các phạm vi đã chọn
Sub ClearAllExceptSelection()
'updateby Extendoffice
Dim xRg As Range
Dim xCell As Range
Dim xAddress As String
Dim xUpdate As Boolean
On Error Resume Next
xAddress = Application.ActiveWindow.RangeSelection.Address
Set xRg = Application.InputBox("Please select the ranges want to keep", "Kutools for Excel", xAddress, , , , , 8)
If xRg Is Nothing Then Exit Sub
xUpdate = Application.ScreenUpdating
Application.ScreenUpdating = False
For Each xCell In ActiveSheet.UsedRange
If Intersect(xCell, xRg) Is Nothing Then
xCell.Clear
End If
Next
Application.ScreenUpdating = xUpdate
End Sub
4. Sau đó nhấn F5 để chạy mã này và một hộp nhắc xuất hiện để nhắc bạn chọn phạm vi ô mà bạn muốn giữ lại, nếu bạn đã chọn phạm vi ở bước 1, vui lòng nhấp vào OK, nếu không, bạn có thể chọn các ô bạn muốn trong hộp nhắc và nhập dấu phẩy để phân tách nhiều phạm vi, sau đó bấm OK nút, xem ảnh chụp màn hình:
5. Sau khi nhấp OK, tất cả các giá trị ô khác đã bị xóa nhưng chỉ để lại các phạm vi đã chọn, xem ảnh chụp màn hình:
Xóa tất cả trừ các phạm vi đã chọn với Trình trợ giúp Phạm vi Chọn của Kutools cho Excel
Nếu bạn đã cài đặt Kutools cho Excel, Với khả Lựa chọn nghịch đảo tính năng của Chọn trình trợ giúp phạm vi tiện ích, bạn có thể nhanh chóng đảo ngược lựa chọn và sau đó xóa các lựa chọn đã đảo ngược cùng một lúc.
Kutools cho 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 cho Excel, vui lòng làm như sau :( Tải xuống miễn phí Kutools cho Excel ngay! )
1. Chọn phạm vi ô mà bạn muốn giữ lại.
2. Sau đó nhấn vào Kutools > Chọn > Chọn trình trợ giúp phạm vi, xem ảnh chụp màn hình:
3. Trong Chọn trình trợ giúp phạm vi hộp thoại, kiểm tra Lựa chọn nghịch đảo, xem ảnh chụp màn hình:
4. Và sau đó kéo chuột để chọn phạm vi mà bạn muốn đảo ngược các lựa chọn. Khi bạn thả chuột, các ô đã chọn đã được bỏ chọn và các ô không được chọn sẽ được chọn cùng một lúc. Xem ảnh chụp màn hình:
5. Sau đó, đóng hộp thoại và nhấn Xóa bỏ để xóa các lựa chọn cùng một lúc. Và chỉ các ô mong muốn của bạn đã được giữ lại, hãy xem ảnh chụp màn hình:
Tải xuống miễn phí Kutools cho Excel ngay!
Xóa tất cả trừ các phạm vi đã chọn với Trình trợ giúp Phạm vi Chọn của Kutools cho Excel
Một tiện ích khác-Sao chép phạm vi of Kutools cho Excel cũng có thể giúp bạn hoàn thành công việc này, bạn chỉ cần sao chép các phạm vi đã chọn của mình sang một trang tính mới, sau đó xóa trang tính cũ.
Sau khi cài đặt Kutools cho Excel, vui lòng thực hiện theo các bước sau :( Tải xuống miễn phí Kutools cho Excel ngay! )
1. Giữ Ctrl để chọn phạm vi ô mà bạn muốn giữ lại.
2. Sau đó nhấn vào Kutools > Sao chép phạm vi, xem ảnh chụp màn hình:
3. Và trong Sao chép nhiều dải hộp thoại, kiểm tra Tất cả tùy chọn theo Dán đặc biệt, kiểm tra Bao gồm cả chiều cao hàng và Bao gồm chiều rộng cột nếu bạn muốn giữ chiều cao hàng và chiều rộng cột mà bạn muốn, hãy xem ảnh chụp màn hình:
4. Sau đó nhấn vào Ok và một hộp nhắc khác sẽ bật ra để nhắc bạn chọn một ô để đặt các ô đã sao chép, vui lòng chọn một ô trong một trang tính mới, xem ảnh chụp màn hình:
5. Và sau đó nhấp vào OKvà chỉ các phạm vi đã chọn của bạn mới được dán vào trang tính mới và bây giờ bạn có thể xóa trang tính ban đầu khi cần.
Tải xuống miễn phí Kutools cho Excel ngay!
Demo: Xóa tất cả trừ các phạm vi đã chọn với Kutools cho 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 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...
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!