如何在关闭 Excel 工作簿时自动保护所有工作表？

在使用 Excel 创建工作簿时，我们可能会遇到需要保护工作表的情况。在工作表保护下，我们可以限制用户更改单元格中的数据或更改工作表的结构等，确保数据的安全性和完整性。然而，即使工作表已经被保护，如果不小心将整个工作簿关闭，所有的工作表保护都会被取消，这将导致数据的泄露和遗失。因此，本文将介绍如何在关闭 Excel 工作簿时自动保护所有工作表。

准备工作

首先，在使用 VBA 代码保护工作表前，需要在工作簿中启用宏。我们可以在 Excel 的选项中将宏设置为可用。打开 Excel ，点击“文件”->“选项”->“自定义功能区”，勾选“开发工具”并确定。然后在选项中选择“信任中心”->“信任中心设置”->“宏设置”，勾选“对所有宏的访问权限进行通知”，这样在启用宏时，Excel 会通过一个提示框来确认我们是否需要启用宏。

接着，在启用宏后，我们需要在 VBA 窗口中输入代码将所有工作表进行保护。我们可以通过 ThisWorkbook 对象来引用工作簿并对其中的工作表进行保护。

代码实现

下面演示如何在 VBA 中使用代码实现在关闭 Excel 工作簿时自动保护所有工作表。

Private Sub Workbook_BeforeClose(Cancel As Boolean)
    Dim ws As Worksheet
    For Each ws In ThisWorkbook.Worksheets
        ws.Protect Password:="password"
    Next ws
End Sub

上述代码中，我们使用了 Workbook_BeforeClose 事件，这个事件在 Excel 工作簿关闭之前会被触发。在该事件中，我们使用 For...Each 循环对 ThisWorkbook.Worksheets 中的每一个工作表执行 Protect 方法，将工作表设置为保护状态，并设置一个密码来限制其更改。在具体实现中，我们可以将 "password" 替换为自己设定的密码。