如何在Excel中刪除所有空白工作表

發布:未知文本批量工具

如何在Excel中刪除所有空白工作表？

同時，如果您的工作簿中包含很多工作表，則其中有一些空白工作表。現在，您要刪除空白工作表以保存或存檔文件。您如何從多個工作表中搜索空白表并自動將其刪除？

用VBA代碼刪除所有空白工作表

刪除所有空白工作表 Kutools for Excel

用VBA代碼刪除所有空白工作表驚人的！在 Excel 中使用高效的選項卡，如 Chrome、Firefox 和 Safari！每天節省50％的時間，并減少數千次鼠標單擊！

對于您來說，檢查空白工作表并一一刪除它們是很麻煩的，但是使用以下VBA代碼，您可以輕松地一次刪除所有空白工作表。

1。按住 ALT + F11 鍵，然后打開 Microsoft Visual Basic應用程序 窗口。

2。點擊插頁 > 模塊，然后將以下代碼粘貼到“模塊”窗口中。

VBA：刪除所有空白工作表

Sub DeleteBlankWorksheets（）更新0830將Ws作為錯誤恢復工作時的下一個工作表Next Application.ScreenUpdating = False Application.Displayalerts = False對于Application.Worksheets中的每個Ws如果Application.WorksheetFunction.CountA（Ws.UsedRange）= 0然后Ws.Delete End如果Next Application.ScreenUpdating = True Application.Displayalerts = True End Sub

3。然后按 F5 鍵，并立即刪除所有空白工作表。

刪除所有空白工作表 Kutools for Excel

如果您不熟悉VBA代碼，我可以為您介紹一個簡單的工具- Kutools for Excel，其 刪除空白工作表 功能，您可以一鍵刪除所有空的工作表。

Kutools for Excel 包括300多個便捷的Excel工具。，不受限制。 立即獲取.

當你已經安裝 Kutools for Excel，請執行以下步驟：

1。點擊企業 > 工作表工具 > 刪除空白工作表，請參見屏幕截圖：

2. 然后將出現一個提示框，提醒您是否要刪除所有空白工作表，請參見屏幕截圖：

3。然后點擊是，并且空白工作表已成功刪除。查看屏幕截圖：

如果您想進一步了解此功能，請單擊 刪除空白工作表.

相關文章：

如何在Excel中刪除隱藏的工作表？