如何在 Excel 中删除活动工作簿(当前文件)?

由于 Microsoft Excel 拥有众多强大的工具和功能来组织和修改数据，有时需要删除正在处理的文件。本文将逐步指导您完成整个过程，无论您是想重新开始操作还是删除多余的文件。

在 Excel 中删除活动工作簿时，需要执行一些简单但必要的操作，以防止意外删除宝贵的数据。请务必记住，此步骤会永久删除文件，因此建议您在继续操作之前进行备份或确保不再需要该工作簿。本文将介绍几种在 Excel 中删除当前工作簿的方法。无论您使用的是最新版本还是更早版本，本文描述的方法都适用于任何版本的 Microsoft Excel。

删除活动工作簿(当前文件)

首先，我们将创建一个 VBA 模块并运行它来完成我们的任务。让我们通过一个简单的流程来了解如何在 Excel 中删除活动工作簿(当前文件)。

步骤 1

考虑任意 Excel 工作表。首先，右键单击工作表名称，然后选择"查看代码"以打开 VBA 应用程序。然后在 VBA 应用程序中，点击"插入"，然后选择"模块"。

右键单击 > 查看代码 > 插入 > 模块。

步骤 2

然后将以下代码复制到文本框中，类似于下图。

代码

Sub DeleteActiveWorkbook()
Dim xFullName As String
xFullName = Application.ActiveWorkbook.FullName
ActiveWorkbook.Saved = True
Application.ActiveWorkbook.ChangeFileAccess xlReadOnly
Kill xFullName
Application.ActiveWorkbook.Close False
End Sub

步骤 3

然后将工作表保存为启用宏的模板，并按 F5 运行模块，此时活动工作簿将被删除。

注意

此 VBA 可以关闭 Excel 窗口，但不能关闭活动工作簿。删除活动工作簿后，如果没有打开新的工作簿，请手动关闭 Excel 窗口。

此 VBA 无法删除从未保存过的工作表。但通过关闭它，您可以立即删除此未保存的工作簿。

结论

在本教程中，我们使用了一个简单的示例来演示如何您可以删除 Excel 中的活动工作簿(当前文件)以突出显示特定的一组数据。

相关文章

• 如何在 Excel 中复制受保护工作表的数据?
• 如何在 Excel 中将当前单元格地址复制到其他位置?
• 如何将条件格式规则复制到另一个工作表/工作簿?
• 如何在 Excel 中复制列宽?
• 如何将基于单元格值的列复制到另一个 Excel 工作表?
• 如何在 Excel 中复制带文本框的图表?
• 如何在 Excel 中复制包含特定值/文本的列?
• 如何在 Excel 中复制单元格的行高和列宽数据?
• 如何在 Excel 中复制单元格而不换行?
• 如何在 Excel 中仅复制单元格公式而不复制格式?

有用资源

• excel 参考教程 - 该教程包含有关 excel 的更多信息:https://www.cainiaomax.com/excel/