在本 Excel 教程中，您将学习如何 – 删除 Excel 中的工作表 – 删除多张工作表 – 使用VBA删除工作表
我们使用 Microsoft 365 来准备本文。您可以在 Excel 2021、2019、2016 和 2013 中使用这些方法。
有时需要删除工作簿中不相关的工作表。不必要的工作表会降低工作簿的可读性。在使用Excel时，了解如何删除工作簿中的一个或多个工作表是一项非常基本的技能。
如何删除Excel中的工作表？我展示了在 Excel 中删除工作表的 5 种简单方法。这些是使用“主页”选项卡、上下文菜单、导航窗格、键盘快捷键和带键盘的上下文菜单。
1.使用主页选项卡首先，单击要删除的工作表。将其保留为活动工作表。然后，单击主页选项卡，然后单击其下面的删除选项。从删除选项中，选择删除工作表。
这样就会出现提示。最后，选择删除选项。
最终， Use_Home_Tab 工作表已被删除。 2. 从工作表选项卡应用上下文菜单首先，右键单击工作表。然后选择删除选项。
单击提示中的删除选项。
因此，Apply_Context_Menu 工作表已从工作表中删除。3. 使用“视图”选项卡中的导航窗格首先，点击查看标签。然后选择导航。
因此，将出现导航窗格。现在，选择使用导航窗格。
最后，点击删除选项。
将显示 Microsoft Excel 提示。单击删除选项。
因此，该工作表将从工作簿中删除。
4. 使用键盘快捷键删除 Excel 中的工作表4.1 应用键盘快捷键首先，选择纸张。然后按住Alt键。现在按键盘上的H + D + S 键。
屏幕上将出现删除或取消提示。如果您确实想要删除该工作表，请选择删除选项。
因此，所选工作表已被删除。
4.2 应用旧版键盘快捷键首先，选择纸张。然后按住 Alt 键。现在，按键盘上的E和L。
在 Microsoft Excel 提示中，点击删除按钮。
结果，工作表已被删除。
5.同时使用右键和键盘右键单击要删除的工作表。
然后按键盘上的D。将出现带有删除选项的提示。选择删除，工作表将被成功删除。
最后，您删除了该工作表。如何删除Excel中的多张工作表？您首先需要知道如何选择多个工作表。然后您可以删除那些选定的工作表。我将在此处展示如何删除多个相邻或不相邻的工作表。
1.使用主页选项卡首先，按住键盘上的 shift 键。然后一张一张地选择要删除的工作表。
然后，点击首页标签>>选择删除选项。现在，单击删除工作表，所选工作表已被删除。2. 使用鼠标和键盘2.1 使用 Shift 键并右键单击相邻工作表按住 shift 键并选择要删除的工作表。然后，右键单击鼠标。
现在，选择删除选项或按键盘上的D 。
因此，所有选定的工作表都将被删除。2.2 使用 Alt 键并右键单击非相邻工作表按 Alt 键并按住此键可以选择不相邻的工作表。因此，选择要从工作簿中删除的工作表，然后单击鼠标右键。然后，选择删除选项或在键盘上键入D。因此，所选的不相邻工作表将被删除。我可以使用VBA删除Excel中的工作表吗？
要编写任何 VBA 代码，您必须首先启动 VBA 编辑器。
为此，请单击 Excel 功能区中的开发人员选项卡。如果 Excel 功能区中没有开发人员选项卡，则必须从 Excel 选项中启用它。然后，选择Visual Basic选项。
单击Visual Basic, Excel后，您将进入VBA编辑器，在此窗口中，您可以编写VBA代码。
现在，选择插入并添加新的模块。
1. 删除活动工作表此处，Sample_Dataset 是活动工作表。
现在，在您的 VBA 编辑器窗口中编写此代码。Sub Delete_active_sheet()
Application.DisplayAlerts = False
ActiveSheet.Delete
Application.DisplayAlerts = True
End Sub
按键盘上的F5运行代码，活动工作表将从工作簿中删除。
2. 按名称删除工作表在此工作簿中， Sales_Data 工作表是活动工作表。
现在，复制此代码并将其粘贴到 VBA 代码编辑器中。Sub delete_sheet_by_name()
Application.DisplayAlerts = False
Sheets("Sales_Data").Delete
Application.DisplayAlerts = True
End Sub
最后，运行代码，Sales_Data 命名工作表将从工作簿中删除。
3. 删除工作表名称中包含特定文本的工作表在此工作簿中，我有 4 个工作表，其中包含 2020 和 2021 的销售和产品详细信息。我想删除所有包含文本“2020”的工作表。我使用 VBA 代码来执行此操作。
在 VBA 代码编辑器中复制此 VBA 代码。Sub DeleteSheetsWithSpecificText()
Dim ws As Worksheet
Dim searchText As String
Dim wsToDelete As Worksheet
' Define the text you want to search for in sheet names
searchText = "2020"
' Loop through all worksheets in the workbook
For Each ws In ThisWorkbook.Worksheets
' Check if the sheet name contains the specified text
If InStr(1, ws.Name, searchText, vbTextCompare) > 0 Then
' Set the sheet to delete
Set wsToDelete = ws
' Delete the sheet without confirmation
Application.DisplayAlerts = False
wsToDelete.Delete
Application.DisplayAlerts = True
End If
Next ws
End Sub
按F5键运行代码。因此，包含文字“2020”的两张纸已被删除。
4.删除除活动工作表之外的所有工作表在 VBA 编辑器中编写此代码。Sub Delete_sheets_except_active_sheet()
Application.DisplayAlerts = False
For Each ws In Worksheets
If ws.Name <> ActiveSheet.Name Then
ws.Delete
End If
Next ws
Application.DisplayAlerts = True
End Sub
现在，运行此代码，除活动工作表外的所有工作表都将被删除。您必须记住哪些事项？检查工作簿中是否有任何其他工作表或公式依赖于要删除的工作表。如果任何工作表受密码保护，则在删除之前必须取消保护。删除工作表后，该工作表将从工作簿中永久删除。因此，请务必删除任何工作簿。常见问题解答1.如何删除工作表中的所有数据？答案：首先，选择工作表中的所有单元格。单击工作表的左上角（行号和列字母相交的位置）。然后，右键单击所选单元格，然后从上下文菜单中选择“删除”选项。
2.如何在Excel中插入工作表？答案：单击工作簿现有工作表旁边的“+”符号。通过单击+符号，您已插入一个新工作表。
3. 为什么无法删除Excel表格？解答：无法删除 Excel 工作表的原因如下：
您尝试删除的工作表可能受到保护。您需要先取消对工作表的保护，然后才能将其删除。要取消保护工作表，请转到“审阅”选项卡 >> 单击“取消保护工作表”，>> 如果需要，请输入密码。如果要删除的工作表是隐藏的，则需要先将其取消隐藏。右键单击 Excel 窗口底部的任意工作表选项卡，选择“取消隐藏”，>> 选择要删除的工作表。如果工作簿中存在阻止工作表删除的宏，则需要修改代码。确保没有任何宏试图保护工作表。如果工作簿是共享的，则可能会限制删除工作表。 结论我希望这篇文章能帮助您了解如何在Excel中删除一个或多个工作表。我已经描述了执行此操作的多种方法。这些方法包括使用“主页”选项卡、上下文菜单、导航窗格、键盘快捷键、鼠标和键盘一起使用、VBA 等。您必须应用对您而言简单且相关的方法。如果您对此有任何疑问，请发表评论。
在 Excel 中删除工作表：知识中心如何删除 Excel 中除一张以外的所有工作表如何删除 Excel 中的隐藏工作表如何撤消 Excel 中的删除工作表[已修复！] 在 Excel 中删除工作表不起作用