导读：Excel表格中，我们可能会有多个工作表，但有时候我们需要删除一部分的工作表，如果手动一个一个删除，会非常麻烦和浪费时间，那么有没有批量删除的方法呢？本文就将介绍一个批量删除Excel工作表的简单方法，希望对大家有所帮助。
1. 打开Excel表格
首先，我们需要打开要删除工作表的Excel表格。如果已经打开了，可以直接跳过这一步。
2. 打开Visual Basic编辑器
在Excel表格中，点击“开发工具”选项卡，在其右侧点击“Visual Basic”按钮，打开Visual Basic编辑器。
3. 编写宏
在Visual Basic编辑器中，点击“插入”选项卡，在其下拉选项中点击“模块”，这样就打开了一个新的模块，在其中编写下面的宏：
Sub DeleteAllWorksheets()
Dim i As Integer
Application.DisplayAlerts = False
For i = ThisWorkbook.Worksheets.Count To 1 Step -1
ThisWorkbook.Worksheets(i).Delete
Next i
Application.DisplayAlerts = True
End Sub
3.1 解释宏的作用
这段宏的作用是循环删除Excel表格中的所有工作表。
在第1行中，我们定义一个变量i，它是整型。
在第3行中，我们关闭了警告对话框，避免在删除工作表时弹出确认对话框。
在第5-7行中，使用for循环语句，从后往前依次删除每个工作表。
在第9行中，我们重新启用了警告对话框。
4. 运行宏
回到Excel表格中，按下快捷键“ALT+F8”，打开宏界面，选择刚才编写的“DeleteAllWorksheets”宏并点击运行按钮，宏就会开始运行。
5. 检查删除结果
运行成功后，所有工作表都已经被删除了。现在可以再次点击“工作表”选项卡，确认所有工作表已经被删除。
6. 保存更改
最后，别忘了保存对Excel表格的更改。在Excel表格中，按下快捷键“CTRL+S”或点击菜单栏上的“保存”按钮，保存所有更改，完成Excel工作表的批量删除。
总结归纳
本文介绍了在Excel表格中，如何通过Visual Basic编写宏来批量删除工作表的方法。通过这种方法，我们可以轻松地删除所有工作表，有效节省了时间和劳动力。
