打开EXCEL按alt + f11
调出VBA界面
左边有个ThisWorkbook你双击它
然后右边空白处粘贴代码保存就行了
代码如下：
Private Sub Workbook_BeforeClose(Cancel As Boolean)
For a = 1 To Sheets.Count
Sheets(a).Protect DrawingObjects:=True, Contents:=True, Scenarios:=True, Password:=123
Next
End Sub
追问：和软件版本有关系吗？
我的是2010版本，为啥不能保存这段代码？
每次编辑完取消密码保护、写完内容手动保存，结果下次打开就没有密码了
调出VBA界面
左边有个ThisWorkbook你双击它
然后右边空白处粘贴代码保存就行了
代码如下：
Private Sub Workbook_BeforeClose(Cancel As Boolean)
For a = 1 To Sheets.Count
Sheets(a).Protect DrawingObjects:=True, Contents:=True, Scenarios:=True, Password:=123
Next
End Sub
追问：和软件版本有关系吗？
我的是2010版本，为啥不能保存这段代码？
每次编辑完取消密码保护、写完内容手动保存，结果下次打开就没有密码了