|在本文中，您将学习如何使用VBA代码保护和取消保护所有工作表。

要打开VBA编辑器屏幕，请按照下列步骤操作：

单击“开发人员”选项卡。从“代码”组中选择“ Visual Basic”

img1 Click on Insert, and then Module

img2

这将创建新的模块。

在模块中输入以下代码以保护所有工作表。

Sub Protect（）

‘循环浏览工作簿中的所有工作表

对于i = 1到Sheets.Count

Sheets（i）。保护

下一个我

结束子

img3

若要取消保护所有工作表，请使用以下代码。

Sub UnProtect（）

‘循环浏览工作簿中的所有工作表

对于i = 1到Sheets.Count

Sheets（i）.UnProtect

下一个我

结束子

按ALT + F8快捷键打开“宏”窗口，然后选择“保护”宏。

img4

或者，您可以按F5键在VBA屏幕中运行代码。

执行完宏后；所有的床单将受到保护。

按ALT + F8并选择Unprotect

img5

这将取消保护所有工作表。

这样，我们可以在需要时根据＆保护和取消保护工作表。