Làm cách nào để xóa tất cả các trang tính trống trong Excel?
Trong khi đó, nếu bạn có một sổ làm việc có nhiều trang tính, có một số trang tính trống trong đó. Và bây giờ bạn muốn xóa các trang tính trống để lưu hoặc lưu trữ tệp. Làm thế nào bạn có thể tìm kiếm các trang tính trống từ nhiều trang tính và xóa chúng tự động?
Xóa tất cả các trang tính trống với mã VBA
Xóa tất cả các trang tính trống với Kutools cho Excel
Xóa tất cả các trang tính trống với mã VBA
Thật là rắc rối cho bạn khi kiểm tra các trang tính trống và xóa từng trang một, nhưng với mã VBA sau đây, bạn có thể dễ dàng xóa tất cả các trang tính trống cùng một lúc.
1. Giữ ALT + F11 chìa khóa và nó 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 cửa sổ Mô-đun.
VBA: xóa tất cả các trang tính trống
Sub DeleteBlankWorksheets () 'Cập nhật 20130830 Dim Ws As Worksheet Khi Lỗi Tiếp tục Ứng dụng Tiếp theo.ScreenUpdating = False Application.DisplayAlerts = False For Each Ws In Application.Worksheets If Application.WorksheetFunction.CountA (Ws.UsedRange) = 0 Then Ws.Delete End If Next Application.ScreenUpdating = True Application.DisplayAlerts = True End Sub
3. Sau đó nhấn F5 và tất cả các trang tính trống sẽ bị xóa cùng một lúc.
Xóa tất cả các trang tính trống với Kutools cho Excel
Nếu bạn không quen với mã VBA, tôi có thể giới thiệu cho bạn một công cụ dễ dàng- Kutools cho Excel, Với khả Xóa trang tính trống , bạn có thể xóa tất cả các trang tính trống chỉ với một cú nhấp chuột.
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.
Khi bạn đã cài đặt Kutools cho Excel, vui lòng thực hiện theo các bước sau:
1. Nhấp chuột Doanh nghiệp > Công cụ trang tính > Xóa trang tính trống, xem ảnh chụp màn hình:
2. Và một hộp nhắc sẽ xuất hiện để nhắc bạn có muốn xóa tất cả các trang tính trống hay không, hãy xem ảnh chụp màn hình:
3. Sau đó nhấn vào Cóvà các trang tính trống đã được xóa thành cô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 nhấp vào Xóa trang tính trống.
Bài viết liên quan:
Làm cách nào để xóa trang tính ẩn trong 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!